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UNDER THE RAINBOW 




Editor: 

Not that I've run into a CoCo Club or 
anything, but thought you might like this 
picture. I'm sitting behind the ponderosa 
pine with my pole in the water and reading 
my Rainbow, 

Don Fruhwald 
Cincinnati, 4fH 



COCO CUT1E 

Editor: 
My 20- 

deda new word to her spoken vocabulary— 
" 'puter." With all the computer owners 
arourid, I eant help biii wonder how many 
other toddlers have that word as part of their 
vocabulary. For about six months now she 
has beenusinga musical keyboard program, 
seldom pounding the keyboard. Her favorite 
key is, naturally, the red BREAK key which 
is the highest note. 

Ckirt Milky 
Rocky Point, NY 

MORE NON-EXTENDED 

Editor: 

Let's sec more non-Extended programs in 
your magazine. 

The record idea is good but if it will only 
have Extended basic programs 1 can't use it. 
Yes, Virginia and Lonnie, there are some 
non-Extended CoCo owners in this world. 

I have not seen a listing of the quantities of 
the different CoCos sold by Radio Shack 
since they were introduced. How many 4Ks, 
16Ks Extended and non-Extended, etc. 

If this information is not available to you, 
why not have a poll from your readers? 

William M. Vance 
Crockett, TX 

Editor's Noie; We recognize the need 
for non-Exteitded Color basic pro- 
grams and encourage our renders to 
submit such programs to the Rain- 
how, For further details read PRINT 
tt-1. 



KUDOS 

Editor: 

I enjoyed the article and program in the 
Juneissueon solving cryptograms by Chris 
Reid I typed in the programs and when it 
did not work I tried everything I knew. Then 
I sent a letter to Mr. Reid. He was very 
helpful in the reply he sent. I want to com- 
mend Mr. Reid for his patience (two letters 
offering suggestions) and help. 

The entire Rainbow magazine isexcellent, 
keep up the good work. 

Richard Urich 
Sellersville. PA 

Editor: 

1 love your magazine! When I first sub- 
scribed in March, 1 thought the subscription 
rate a little high. But it was worth every 
penny. Compared to the other magazines, 
this magazine is the greatest! I especially like 
all of your assembly language articles and 
tutorials. Keep it coming. 

Mike Brennetnan 
Leola, PA 

As a gift for Father's Day my three child- 
ren gave me $22 to buy a subscription to 
Rainbow magazine. Their reasons were that 
they saw me drive 26 miles three times a 
month just to insure getting one of the three 
magazines (Rainbmw) the bookstore would 
get. Can you beJieve that? Three magazines 
for a town of over 5 9. #00 population. 

You have a good thing going please 
don't stop. Your magazine is worth twice the 
price. 

Rick Maurer 
Ranioul. IL 



HINTS AN* TIPS 

Editor: 

Phillip Beistel's program Shuffle in the 
July issue of Rainbow is a dazzling moderni- 
zation of Sam Loyd's famous 14-15 puzzle. 
Like the original 14-15 puzzle, If there is one 
small error with some of the starting Arran- 
gements, the puzzle is unsolvable 

Sam Loyd intentionally presented the 
puzzle with all the tiles in order except for 1 4 
and 15, which were reversed. He offered a 
S1000 reward to anyone who could find a 
sequence whteh would put the 14 and 15 in 
their correct order. It is said that ships were 
wrecked and trains derailed while their re- 
spective pilots tried to solve this confound- 
ing puzzle. 

To spare the reader from a similar fate, 1 
present beJ»w a randomization routine 
which always generates a solvable arrange- 
ment. These program lines should replace 



the corresponding lines in Beistel's listing. 

13 Z=I 

14 FOR X= I TO 4; FOR Y=I TO 4: 

A(X,Y)=Z: 

Z=Z+1: 
NEXT Y,X: 
SCREEN 0,0 

15 FOR X=I TO 4: FOR Y=l TO 4: 

IF X=4 AND Y=>3 GOTO 18 

16 RX=RND(4): RY=RND(4): 

IF (RX=X AND RY=»Y) OR (RX=4 
ANDRY=4)GOTO!6 

17 Z=A(X,Y): A(X,Y)=A(RX,RY); A(RX. 
RY)=Z 

18 NEXT Y,X:X 16=4. Y 16=4 

The reason for this situation is that Beis- 
tel's randomizati 

arranges the titles in a completely randorfl 
order. This type of algorithm produces hoth 
odd and even permutations of the titles. Any 
set of moves on the 14-15 puzzle, dn the 
other hand, only produces even permuta- 
tions. Combinations of even permutations 
only produce more even permutations. 

This was the problem with the original 
14-15 puzzle. By swapping just one pair of 
titles, Loyd induced an odd permutation on 
the puzile which mode it unsolvable. An 
excellent discussion «f permutations as re- 
lated to puzzles of this type {including that 
mindbogglinghexahedron)rnay befoundin 
Puzzle It 9ut: Cubes, Groups, and Puzzles 
by John Ewingand Czes Kosniowski (Cam- 
bridge University Press.) 

James W. Stelly 
Houston, TX 

Editor: 

With the advent mf w»rd processors and 
other software programs with upper and 
lower case screen displays with up to 80 
columns, there may be a problem of poor 
resolution. 

1 have a tip that may help by eliminating 
most interference on your TV type monitor. 
Carefully wrap the eomputer output cable 
with heavy duty aluminum foil and then 
ground this shield to various places on the 
TV set by trial until you have eliminated the 
screen interference. (Try attaching to one 
lead of the internal antennae ) Grounding to 
an earth ground may also be helpful. 

We really enjoy your magazine! 

Ben H. Little 
Portage. Wl 

Editor: 

I have been experimenting with the speed 
up POKE commands and have found that 
you can CSA K£and CLOAD while in the 
speed up mode. You first load in the pro- 
gram you want to save. Second, POKE 
65495,0 and then CSA VE your program. 
When you want to CX0,4Dit, first POKE 
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65497,0 and then CLOAD it. The volume on 
your eassette player should be set louder 
than usual. Note: this method has not always 
worked with all my programs, but did work 
with a lot of them. After your cassette player 
stops. Poke 65496,0 to put the computer 
back to normal, 

K»cp up the good work, Rainbow. 

Anthony Graves 
Uuisville, KY 



Editor; 

1 read a great book, "Assembly Language 
Graphics for the TRSSQ Color Computer" 
by Don lnman and Kurt lnman. It is an 
excellent tutorial and great reference book. 
Hats off to B. Dalton Bookseller stores for 
realiy getting into personal computing 
hooks. 

Rusty Bernard 
Shreveport, LA 

Editor's Note: Many B. Dalton Book- 
seller stores now also carry the Rain- 
bow. 

Editor: 

I would like to bring to your attention two 
TV shows dedicated to the computer. One 
can be seen on PBS, the other on cable sys- 
tems offering SPN. Although neither of the 
two programs concentrate on any particular 
brand name or system, new software and 
hardware are featured on each show. 

The "Computer Programme" on PBS was 
originally produced in England and offers a 
wealth of information including some won- 
derfully elear explanations of BASIC pro- 
gramming as well as featuring some of the 
latest applications for the computer. It is a 
serialized show that "builds" from week to 
week. It appears to be designed to increase 
the computer literacy of the general public 

SPN 'r "Personal Computer Show" is pro- 
duced in Texas (home base for Radio Shack, 
T.I„ and others) and is a "magazine" type 
show. Besides offering stories and interviews 
on software, hardware, and applications, 
they arc givingaway computers. Because the 
show is still in production, they do answer 
questions on the program. 

Both shows are a real service to computer- 
ists in every level of endeavour. Check your 
TV listings. Yes, Virginia, there arc other 
uses for a C1T. 

James £. Burnett 
Latham, NY 



SOUNDSHEET SOUNDOf F 

Editor: 

1 want to compliment you on your fine 
magazine. You have the best Color Compu- 
ter magazine around. The record inside the 
2nd Anniversary issue was a great idea that I 
would like to see again. Keep up the good 
work! 

Barry Martin 
Houna. LA 

Editor's Note: It appears that we will 
not have the soundsheet in the Rain- 
bow on a regular basis. For more 
details, please read PRINTH-2. 



Editor: 

1 have been a Rainbow subscriber for 
eight monthsnowand your 2nd Anniversary 
issue was the best yet. 1 get the other CoCo 
magazines, but the Rainbow beats them all, 
in quality as well as 4uantity. 

I especially enjoyed the sound recording. 
All three programs loaded without an error. 
1 think the inclusion of a record on a regular 
basis would be well worth a price increase, 

1 am looking forward to your next issue. 

J. Paul Fountain 
Denfn, MD 

Edifr: 

I loved thesoundsheet in your 2nd Anni- 
versary issue. 1 hope you can continue to 
include them, especially for the longer pro- 
grams. I often hesitate i n typing in long pro- 
grams unless 1 am certain of their value to 

I am uncertainabout your price increase 
for the soundsheet. You said something 
about "increase priees a little" and "very 
expensive" in the same sentence in your 
PRINT $-2 column. The soundsheet is of 
obvious value but 1 hope it is well under the 
price of Rainbow *n Tape and other tape 
magazines. 

Keep up the good work. Your magazine is 
the best around but you have competition. 
Our little CoCo has started to get the atten- 
tion it deserves. 

Dwight A. Sptuer 
Mia. MI 

PLAY IT AGAIN, SAM CHIP 

Editor: 

Congratulations on your innovative July 
1183 issue. I transferred the programs from 
record to tape without any difficultiesatal!. 
I hope you will consider repeating the inclu- 
sion of a soundsheet on a regular basis. 

Keep up the great work. 

Paul Kapaldo 
N. Olmsted, OH 

Editor: 

1 began my subscription to the Rainbow 
in March of this year so 1 have no idea what 
the magazine waslike in the "old days,"but 1 
want to compliment you on the appearance 
and content of the Anniversary issue. The 
reeord is a great idea and if you eould 
include records regularly without increasing the 
c»ver cost more than $1, you'd have a good 
thing going. Perhaps you could include a 
longer record every other month, 

To play the record. I bypassed fcy steie* 
and plugged the turntable output directly 
into the computer record. The first time I 
was able to load the last two programs on the 
reeord. but it took several re-reeordings and 
CLOADs before I got the firsi program to 
load. 

Dick Wilson 
Auburn, MA 

Editor: 

Please hear an impassioned plea from a 
subscriber with little money and less time. 
I'm working my way back through school 
with my eye on a Bachelor's in Information 
Systems, while working part time (have to 
keep up the mortgage payment somehow), 
and the only thing in shorter supply around 
my house than cash (ean't afford tapes) are 



minutes. Let it be that we can see more of 
these datacordings in future issues of your 
magazine. Even if you were to include only 
half the programs that your tape edition 
does, 1 could rest more easily at night, know- 
ing my monthly issues of Rainbow weren't 
going to waste while 1 frittered away my time 
with such mundane concerns as college, 
work, and family. 

A little more money per issue lean handle, 
although the prices of taped editions will 
probably remain out of my reachuntitsome- 
time after graduation. 

Richard Williams 
Tmcon, A2 

Editor: 

Just received the July issue and it is 
superb. I was blown away by the record. It 
transferred to tape and was readable the first 
time! Gniat idea! Why hasn't someone done 
this before? 

Yes, 1 would pay more for tbe magazine if 
it always had a record enclosed. Naturally 
how much moie depeuds ou the quality of 
your pmgrams. The Speeial Adventure issue 
would have been a natural. 

Keep up the good work. 

Phil Humbaugh 
Hartsdale, NY 

Editor: 

As 1 flipped through the 316 pages of the 
July issue of she Rainbow 1 was very pleased 
to find a soundsheet (record) contained 
within its informative pages. And then after 
reading your column 1 wrote you to tell you 
that 1 think it would be ait absolutely fabu- 
lous idea to include one of these soundsheets 
in every issue of the Rainbow. J also feel that 
this kind of an "additive" lo the Rainbow 
would easily substantiate a subscription 
price increase. 

Mark Ab«la 
Agincouh, Ontario 

Editor: 

1 wanted you to know that 1 thought the 
soundsheet in July's Rainbow was a great 
idea. It would be worth a little extra each 
month to see you continue and expand it. 

Thomas Ebting 
East Wenalchee, WA 

Editor: 

Okay you guys, so you've proved your 
point. Your magazine is the best computer 
magazine going. Only the best Would actu- 
ally publish a record. Keep it up! Bui tell us, 
what's next? Perhaps a computer radio sta- 
tion that "spins" programs? 1 leave it up to 
you. Thanks to this ingenious idea of yours, 
I will renew my subscription for a few more 
deeades when it runs out. 

Chris Hartand 
Regina, Saskatchewan 



MOTIVATION-NOT REWARDS 

Editor: 

In the July issue of the Rainbtw, Carol 
Kueppers wrote a review of our Fraction 
Math Quiz program, in the title of that 
review, the word "defects" was used incor- 
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reetly and, therefore, unfairly. Defect im- 
plies a defective product, one that does not 
function as it was designed to function, and 
that certainly is not the case with Fraction 
Math Quiz. However, rather than take issue 
with that unfortunate choice of words, I 
would like to present to your readers the 
philosophy behind the design of Fraction 
Math Quiz. 

Whether or not an educational program's 
attributes are defects, as Ms, Kueppers con- 
tends in her review of Fraciimn Math Quiz 
(the Rainbow. July 1983, p. 167), or assets 
depends on one's point of view and, more 
importantly, on one's educational philo- 
sophy. Ms. 

program does not provide a strong reward, 
such as a game to play after correctly work- 
ing a number of exercises, children will have 
no motivation for using the program for 
math drill. I, along with many other educa- 
tors and most parents, believe that a child's 
primary motivation for any task should 
come from the satisfaction of a job correctly 
done and not from some variation of a car- 
rot-tied-to-a-stick (as in "if you finish your 
homework, you can have an extra dessert"). 
This philosophy does not exclude a "pat on 
the back" for a job well done, nor does il 
exclude some fun along the way. It simply 
says that the fun should not be the primary 
motivation for the child's good perfor- 
mance. Indeed, Ms. Kueppers sums this phi- 
losophy up very well when she says that "you 
should provide the motivation and reward 
that the program lacks." 

Fraction Math Qui: was designed, writ- 
ten, and chi Id-tested with exactly this philo- 
sophy in mind. The personalized prompts 
and musical rewards provide the pat on the 
back, while the "Starship Commander" 
menuchoi»eprovidesa short, enjoyablediv- 
ersion, as well as an ohject lesson for child- 
ren who wonder why they are learning math 
when a computer can do it so much faster. 
From this point of view, the program's 
"defeets" become assets that will help a child 
develop a strong sense •( self-motivation. 

J.D. German, President 
Creative Technical Consultants 
Cedar Crest, NM 



INFORMATION PLEASE 

Editor: 

I would like lo install a TRS-80 MOD I 
keyboard in my CoCo. Do you know of any 
instructions for this, which includes cutting 
(races, etc.? I have a "retired" MOD I with a 
perfect keyboard, and I could figure out the 
modification in time, but if someone has 
alica4y dorieit.it could be very helpful and a 
time-saver. 

Also, I did get a chance 10 attend one day 
of the Rainbowfest — it was super! It looks as 
though a follow-up next year could be twice 
as big— and I'll attend again if it is held at 
Woodfteld, Thinks very much for sponsor- 
ing the "CoCo Expo " 

Clay Howe 
Sturgis, MI 

Editor: 

I'm thinking of buying a Tally Mannes- 
mann printer Model MT160L Revision C 



and would like to match it to my CoCo. 

1) Can I connect it directly !• my CoCo as 
is with no additional interface? 2) Should I 
expect a problem finding a cable or making 
one? 3) Will I be able to use the full potential 
of both printer and computer? 4) Can 1 use 
and print information with my CompuServ 
ROM paek? 

Any information would he greatly appre- 
ciated. 

William Burns 
7215 Juniper Drive 
Everett, WA 98203 

Edit»r: 

I definitely like the new look. I also am 
increasingly impressed with the quality of 
your programs and articles. 

This letter is being written on my Rain- 
bow word processor using the spooler pro- 




Editor: 



On the way to work recently I spotted this 
license tag on the car in front of me. A 
"source" in the County Clerk's Office tells 
me the tag is a regular issue and not a special 
personalized plate. 

LITTLE PLEASURES 



gram in the June issue. What a super spool- 
er! I have been watching (he Rainbow grow 
since February 1982 and am pleased to say 
that every issue has been like openirtga pres- 
ent, Speaking of presents! My family has 
decided to give me a subscription to the 
Rainbow for my Father's Day gift. That's 
terriffic except that n«w I need anothn 
excuse to visit my friendly neighborhood 
computer store. 

Does anyone know how to insert lines in 
this word processor? Sometimes it would be 
good to open up the text. 

F, W, hicKenxie 
Saugerties, NY 

Editmr: 

lama new subscriber t* the Rainbow but 
rest assured that as long as I have my CoCo 1 
shall remain on your list. 

I am looking for a disk based R I TY pro- 
gram for (he Color Computer but am not 
having much luck. 

James A. Chandler 
Abilene, TX 

Editor: 

I need help solving Bedlam! One of my 
problems is getting the green key. If anyone 
can help me gel out of Bedlam, please con- 
tact me at 215 North 39th Street. Also, how 
do you get the people in Bedlam to help you? 

Brian Gantert 
Afkntown, PA ISIQ4 



CONTRIBUTIONS PLEASE 

I represe 

ization which uses TRS-M Model I equip- 
ment in virtually every aspect of its affairs. 
We would be grateful if your readers would 
consider contributing additional Model I 
equipment: keyboards, expansion interfa- 
ces, drivers, and printers would be welcome. 
All contributions would be fully tax-de- 
ductible, since we hold "public charity"sta- 
tus with the IRS. 

If you are in a position to make such a 
contribution or would like more informa- 
tion, please drop me a note or call me (col- 
lect, if you like) at (617) 495-9020. 

Robert Epstein. Ph.D. 
Cambridge Clsr. for Behavioral Studies 
II Ware Street 
Cambridge, MA 02138 



Editmr: 

This is why I bought a CoCo: I was having 
a keyboard problem. Sound fa miliar? 1 took 
the computer in Thursday, and on Friday 1 
had a new keyboard in good working order. 
Maybe I am still at the stage where small 
things amaze me. But I do doubt, very seri- 
ously, that any of the competition in Lancas- 
ter could fix this or similar Comparatively 
minor problem(s) at the store. I probably 
would need all sorts of mailing materials in 
hand. 

Now, more than ever, I will tout the 
advantagesof owninga CoCo! Yourmaga- 
zine is great! The mix of simplicity with 
sophistication lsjust fine. I only wanted to 
find out what all the screaming about the 
coinputerrevolut ion was all ab«ut. Now I'm 
hooked! 

John Spencer 
Lancaster, PA 



JAPANESE PHONEMES 

Editor: 

1 am writing in answer to R.W. Oilin's 
letter in your April issue. I am quite sure the 
fellow in Houston purposely added those 
strange hieroglyphics to the CGP-115 to 
increase international sale*. It is the Japa- 
nese phonetic system — Katakana. Compu- 
ters in Japan have the katakana on their 
keyboard for print, input statements (pro- 
gramming isstilldoneinBASiC) and a printer 
without this capability would be useless. 

Toni Strong 
Okinawa, Japan 



A FINE EXAMPLE 

Editor: 

1 would like to thank Brian James for a 
fair and accurate review of our C'oC'o- 
Accountant program. He mentioned a num- 
ber of functions he w»uld like toseeineluded 
iri the program, and I am pleased to say that 
the revised version, whieh was not available 
at review time, has a number of improve- 
ments, li will allow the entry of both eheeks 
and credit card expenditures, list accounts to 
the printer, allow the setup of income ac- 
counts and provide a printed spreadsheet 
showing expenditures by month and ac- 
count for the entire year. 
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Mr. James' review was a fine example of 
constructive criticism, and we had reached 
many of his conclusions ourselves. 

Michael J. Hlmowiiz, President 
Federal Mil! Smftwmre 
Bahimmre, MD 



MAGIC ANSWER 

Editmr; 

In a recent edition of the Rainbuw, a 
reader asked for an explanation of the 
Magic Numbers on the front of the NANOS 
reference card for the Color Computer. Here 
is an answer, direct from NANOS. 

"The Magic Numbers work as follows; 
When y»u subtract a graphics code fr»m the 
magic number, the result is the number »f 
the graphic which is the inverse or opposite 
•f the Anginal code. 

"So. y«u can peek a number fr»m the 
screen, subtract it from the original 'Magic 
Number,' and poke the result oui, thus, 
reversing your screen display." 

Hope that answers the question. 

Harold!.. Uroff 
Mvrvrey, NY 




INPUT IRRITATION 

Editor: 

I can't helieve it, you've done it again. 
Please, please, please io not lahel programs 
16K if they are for Extended Color BASIC. 1 
just spent about three hours coding in your 
Finding Enrakian Treasure game when I 
suddenly ran int* ECB commands. This has 
happened to me many times! I have written 
before on this subject and am beginning to 
get irritated. Those of us with basic get very 
few programs from Rainbow, and ii is very 
disappointing when the program that ap- 
pears to be for us is not 

Kathy Maurer 
Hamilton, 0H 

Editor's Note; Sorry, Kalhy. We re- 
gret the error and will be more careful 
in future issues. 



16K, TOO 

Editor: 

Thank you for your prompt, accurate, 
and gratifyingly glowing review of Spectro- 
systems'FajW/w utility (July)for high-speed 
cassette •peratisns. I would, however, like 
to correct a small inaccuracy that appeared 
in the Received and Certified section of the 
same issue, when Fastape was described as a 
32K program. As correctly stated in the 
review, Fastape adjusts itself for the memory 
•opacity of the machine it is runni ng on, and 
thus is compatible with I6K. as well as 32K 
CoCos. 

Anyone desiring further jnformatie.fi 
about the. program is welcome to leave mail 
to me on Compuserve, addressed to 72355.- 
4t7. 

Arihur J. Flexser 
Spectrosysiems 
Miami. FL 



NEW 3" ADD-ON 
DISK DRiVE. 




ONLY $499.00 



USER GROUPS AND 
EDUCATIONAL INQUIRIES 
INVITED 



Up to 624 KBytes 
formatted storage! 

Turn Your Rainbow into a Computer 
Goldmine Machine. Get the new, eco- 
nomical Amdek 3" disk-drive system. 
It's compatible with your Co-co and fea- 
tures two sup«r-compact 3" hard-plas 
tic encased diskettes for up to 624 
KBytes formatted storage. The disk- 
ettes fit into a shirt pocket . . . and 
they're easy to mail, too. Expand your 
Rainbow to allow you to do more, and 
relax because your media is durable. 



C| iJR MiCR# 

32 1 STATE STREET 
ST. JOSEPH, MICHIGAN 4fOS5 
1-8CO-732-7323 
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We're just about to pop for telling you the news that 
we've planned four of our RAINBOWfest shows 
for the corning year. And the first one? It'll be in Ft. 
Worth — home of Radio Shack. 

RAINBOWfest in Ft. Worth will he October 14-16 at the 
Hyatt-Regency Ft. Worth. It (and the others to come) will 
follow the same pattern that made the very first RAINBOWfest 
so successful this spring in Chieago. There will be a breakfast 
with a nationally-known speaker, a series of seminars and the 
biggest and best show of Color Computer software, hardware 
and other materials ever assembled in one place. 

We are very pleased to announce that Ed Juge, director of 
computer marketing for Radio Shack, will be our breakfast 
speaker in Ft. Worth. Ed is extremely well-known and 
knowledgable and we are proud to have him with us. 

Other RAINBOWfest shows will be in Long Beach, Cal- 
ifornia, February 17-19; just east of Philadelphia, Pa., April 
6-8 and in Chicago June 22-24. All will be at Hyatt House 
Hotels and all will have the same general format of a bigexposition of Color Computerproducts, a 
well-known breakfast speaker and a series of seminar sessions. 

The way we selected this year's sites is simple: Ft. Worth goes without saying, as headquarters for 
Radio Shack; we thought Southern California would be a nice place to be in February; Chicago was 
so successful last year, and so close to Canada and the Great Midwest, that we just had to do it 
again; while the Philadelphia site (just 6.3 miles from Independence Hall and the Liberty Bell) 
brings CoCo Community to the populous East Coast for the first time! 

Subject to some modification, exhibit times will be 7-10 p.m. on Friday. 10 a.m. -6 p.m. on 
Saturday and 1 1 a.m. -4 p.m. on Sunday. Tickets can be had for $8 for a three-day ticket in advance 
($12 at the door) or $6 for a one-day ticket ($8 at the door). Breakfast tickets are $11. There is a 
$1.00 handling charge for each advance order. 

There are details on another page, and an order form (look for RAINBOWfest in the advertiser's 
index) with deadline inf ormation and the like. But, I hope you will come to one or all of these shows. 
Last spring, RAINBOWfest was one of the most exciting things in the CoCo Community. Please 
come to one or more of them this year! 

As you can no doubt tell from our cover, this is our Annual Education Issue. But, as the wizardry 
of cover artist Fred Crawford shows, too, there is something else afoot this month. 

In a way, we designed the cover of this month's issue of the Rainbow on purpose to combine a 
report on the new Color Computers from Radio Shack and what has become our longest-running 
special issue theme. 

We all should be gratified by the new CoCos coming our way from Radio Shack. Not only are 
they excellent machines, but they should lay to rest — for now and forever — the words of the 
doomsayers who have, off and on, predicted the demise of the Color Computer. 

What we see here is not so much two new Color Computers but a line of Color Computers. In 
making a commitment of this sort to CoCo, it seems tome that Tandy is saying, for once and for all, 
that the Color Computer is here to stay. 

For, as you know, there is more to thisthanjust the hardware of the 64 K Color Computer and the 
Color Computer 2. You can bet that other products are in the works to support these machines 
— one of which is certainly the OS-9 operating system which will be available with the 64K model. 

And not-so-incidentally, these are sleek, well-designed computers. Again, Radio Shack has done 
a most excellent job. Check them out and I am sure you will agree the new Color Computers are 
truly a "cover" story! 

You will see all sorts of interesting articles on the subject of education in this month's issue, but 
there are some things missing. (continued on page 172) 
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ETTER 

OFTWARE COMPANY 

PO 3c* 16*42 -- Si* B 



PRESENTS 

COI-OR- STICK 

The •MGINAL imerface f«r 
theTR5-oO* 
Color Compwerf o ler 
yooose the famous: 

ATARI* JOYSTICK' 



Just plug y»ur Atari or Atari like 
joystick (the Color -Stick enables the 
use of m»st joysticks made for the 
Atari) into the Color-Stick interface 
and then plug the Color Stick ::r.»<in 
empty joystick port. 

The Color-Stick can improve 
scores 50% and more while making 
some games more excitinj and fun to 
play. 

Don't settle f«r cheap imitations. 
Only the ORIGINAL Coi.r-Stick's. 
small inline design aliows you to just 
plug your joystick mt» it andforget it. 
The Color-Stick becomes a part ml 
your joystick so it does not interfere 
with your game playing. In addition 
Color Stick returns a full value of '63' 
for the right and down directions, 
even when using tw joysticks and 
even in the diagonal directions, the 
others don't, 

NOW Cotor-Stick has a 

new low price 

Color-Stick interface $11.95 each 

two for SW.f 5 (less joysticks) 
Atari joysticks $9.95 each 

ETTER 

~ OFTWARE COMPANY 

P.O. B»x 16842 - Sta. B 
Greenville, South Caiolina 29606 
(SC3) Z33-270O 

Don't miss out order the 
•RIGINAL. Send your check or 
m«ney order or better yet call 
today and order your Color Stick. 




BUILDING SEPTEMBER'S RAINBOW 



Our annual education issue . . . 

Plus, two new CoCo's introduced . . . 
And, Radio Shack's OS-9 arrives . . 



When my mother gets in a story-telling mood, one of her favorites is 
about howl spent most of my first school yejir disrupting class; you see, 
she was the teacher. It wasn't a one-room schoolhouse — it had two, . . . 
but the outhouse was way down at the bottom of the hill. Yes, most kids were 
barefoot and we drank well water from a community dipper. Mom taught three 
grades. The first, second and third grades each occupied a single row of seats. 
While two rows were involved in seatwork, Mom gave lessons to the third. 

The thought of a computer in that old oiled-floor, white frame tinder box 
perched on stone columns fairly boogies the mind. To begin with, the nearest 
electric outlet was about six miles away. Well, I like to think I learned something 
that first year in school, but the only interactive instruction 1 canrecallcame from 
the tip of a hickory switch. 1 went the entire year thinking "L-M-N-O-F" was a 
single word in the middle of the alphabet. 

About the only aspect of education that hasn't changed since those days is that 
squeaking chalk still brings shivers. 

In education, these arc the good, newdays, so pay attention now; there may kea 
pop quiz. After all, this is Rainbow s education issue, And, the text is a thick one, 
324 pages. That means you'll have to read 1 1 pages a day just to keep from falling 
behind! 

Students, teachers, parents— we have articles and programs for all of you. Need 
help with a composition? Stephen Tchudi's Write Idea will help you develop ideas 
for a theme, and Larry Konecky's Bibliography File will help you complete your 
research. Teachers will want to check out Paul Luetke's grade averaging utility as 
well as Norman Garrett's random lab scheduler program. Parents should read the 
commentaries by Steve Blyn, Dale Peterson (Uncle Bert), Dr. Michael Plogand 
Larry Kherialy (author of Radio Shaek's Pilot, Logo and Game Writer, among 
other works). Educators, especially, should note Dr, Plog's survey form — which 
will help him help you with software evaluations. 

Music, math, spelling, metric conversion, science drills and even educational 
games are complemented by a dozen-plus reviews of commercial educational 
programs. Also,everyauthor, it seems, ison the soapbox with an opinion on~the 
real purpose of computers in education." 

Study hard now, and if you're good, we'll tell you, and show you, all about 
Radio Shack's very own, just-released 64K. machine. We have one and it's a 
honey, "fawn gray."(bone white) with a trim new style and a new keyboard. Along 
with the 64K CoCo comes the CoCo 2, a new compact version of the Color 
Computer. Check out the Pipeline for Editor Lonnic Falk's impressions, then, f«r 
another insider's took at all sides of the long-awaited 64K CoCo, read Dan 
Downard's observations, not only of the hardware itself, but also his preview of 
what O.S-Pcando. (Next month, Dale Puckett, nationally-know expert on OS-9, 
will begin a monthly column on OS-9!) 

Finally, if you've been following Roger Schrag's series on patching EDTASM+, 
this month is icing on the cake — with ice cream on the side. His latest update 
supports 64K! 

Next month graphics, then, i n November, the winners o four simulation contest 
plus a special focus on data communications. But, since this is the education issue, 
here's a tip in Economics 1; subscribe to lite Rainbow while it's still only $22 a year 
and you'll get more than 15 pounds of Rainbow for less than half the cover priee. 
Let's see, in kilos, that's uh . . . page 226, isn't it! 

—Jim Reed 



16 the RAINBOW September 1993 




18 lh« RAINBOW September 1963 



J6K 



Student informationconststs of last namcand first name. 
Array NS is set up for ihree entries in the second dimension 
so that a student number orother piece of information could 
be inserted. The print logic would have to be modified to 
print such data. The student information is contained in 
DATA statements. I suggest that this be modified 
to accept tape or disk files, thus making the 
program more flexible and usable for multi- 
ple classes. Array NS is loaded in lines 600— 
640. After loading the array, the programasks 
for user input concerning the lab sessionsflines 
680—8 10). The user will need to supply the fol- 
lowing information: 

I ) How many lab sessions will be planned? 
2) How many work stations are available'' 
3) How many alternates should be selected 1 
' 4} What is the date of the session? 
f 5} What time does the session begin? 
f 6} What time does the session end? 

Items 2-6 repeat for each session, allowing the user 
to alter the data between sessions For example, some- 
s 1 may want to reserve a station lor demonstration 
f during only one of lour labs. This allows me to do it. Items 
6 are for the header on the report. 
Lines 880—980 test the status of each student in the a rray. 
The idea here is todctermine whether each student has had a 
selection opportunity before opening it up to allow subse- 
quent selections. lithe number of students whohavenot yet 
been selected is less than the number of stations available for 
this session, a hranch is made to a routine which will assign 
theremainder(lines 1780- 18ii0).Thcn,to.scheduletherest > 
go to a routine which will randomly select (rom all possibili 
ties without regard to a previous selection (lines 1590 — 
1 650). That routine fills the rest of the quota for the session. 

If there arc still students to be assigned for the first time, 
and that number is equal to »r exceeds the number of 
stations available i'»r the current session, a branch is made to 
the normal selection r»uunc( lines 1690— 1 740)1 or the selec- 
tion process. 

Note that the selection logic is such that two nags are 
available for testing. The Selection Flag indicates that the 
student has already been selected for this session. This flag 
attcms you to avoid the pitfall of scheduling the same person 
twice in the same session. The Primary Flag indicates that 
the student has already' been selected one time. This is 
checked until the condition is met where everyone has been 
selected once. 

After the primary selection process is complete for the 
session, the alternate selection process takes place (lines 
1920- 2010) Once all selectees for a session are tabled, the 
print routine takes place. 

The print logie does not include a paging routine. After 
each session is printed, you must manually set top-of-form 
before proceeding to the next session. Paging logic lo fit 
y»ur particular printer would be a relatively simple en- 
hancement to make. 

Actual uses lor this program arc many and varied, espe- 
cially in educational settings. It can be used to schedule oral 
presentations, speeches, foreign language lab sessions, in- 
dustrial arts projects, physical education activities or mu- 
sical presentations. With modification, tiutput could go to 



the screen when no printer is available. A screen would have 
to be formatted and paging logic inserted, neither of which 
should present major problems. 

There is one limitation that you should be aware of: if you 
inadvertently enter more stations than there are students, an 
infinite loop will result. The bug could be resolved by an edit 
routine where the number of stations is input by the user, in 
reality, though, a situation likethat would presenta scenario 
for which this program was not designed. 

Hardware Required 

16KColor Computer with Extended Color BASIC Printer 
(DMP-100) 

LAB SESSION ROSTER 



DATE: 2/28/83 
Session Number 1 

PRIMARY SELECTIONS 

1. Volckmann, Steven 

2. Williams, Olive 

3. Rigoni. Ruby 

4. Fancy, John 

5. Soules. Car«le 

6. Wood, Patricia 

7. Zelinski, Pat 

8. Kelly, Colleen 

9. Turnmire. Ruth 

10, Koenig, Su.'anne 

1 1 , Rigoni, Herbert 

12. l.ockhart. Edgar 

13. Moore, Kay 



TIME: ? PM TO 8 PM 



ALTERNATES 



t. Reay, Christie 

2. Martin. Rosemary 

3. Armendari/. Myra 

4. Sims, Lucy 



360. .. . 04B9 

640 0753 

970. ., . 03F9 
1280. . . OC66 
1550. . . 0F77 
1840. .. 11EC 
END. . . .1433 



20 
30 
40 
50 
55 
60 
70 



* RANDOM LAB SCHEDULER * 
# . * 

* BY NORM GARRETT 9/82 * 

* COPYRIGHT <C> 1983 * 

* SOFTWARE DESIGN CONCEPTS* 
»»#»♦♦♦♦»♦**#♦#♦«•#♦*#♦♦*♦** 



.*>. VARIABLE LISTING 



110 " 

120 ' 
-40) 

130 ' 

140 ' 

150 ' 

160 8 

170 » 

180 1 

190 " 

200 ' 
ER 



NAME TABLE (0 

NOT USED 
NOT USED 
FIRST NAME 

RECORD COUNT 

* STATIONS 

# SESSIONS 

« ALTERNATES 
SESSION COUNT 
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210 * N(40,2) 


RECORD TABLE 


410 * AC ALTERNATE COU 




SE.l_E.l_ 1 rLHu 


NTER 




nn T MADV CTI A 


420 * PC PRIMARY COUNT 


B 




ER 




Al TCDMATC CCI 

HLlbKNHIt seL 


430 ' 


ci_ 1 1 una 




440 * 


250 * 0 


LAST NAME 


450 ' 




C T DC T MAMC 

P I KS I NAME 


4 O 0 * — - — INITIALIZATION ~ 




DDT MADV CCI CP 

PKInrirtY seLeL 


470 * 






480 DIM N*(40,2):DIM N(40,2):R~0 


0 




: 8*0 


290 * 1 


FIRST NAME 


490 DIM AT* (20, 2) 


3K>0 X f Y , Z f LI Lj 


NUMERIC WORK 


500 DIM PT* ( 20 2> 






510 POKE 149»0:POKE 150,41 


'izz , J?* 




520 SS=>0: A»0: sc»0: x»0: Y=0: Z»0: AC 


320 SI* 


START TIME 


=0: PO0 




GTnD T T MC 

STOP Tint 


530 FOR X*0 TO 30 


340 PF* 


PRIMARY FIRST 


540 FOR Y»0 TO 2 


NAME 




350 NCX Y)=0 




DDT MADV 1 ACT 


560 NEXT Y:NEXT X 






562 CLSlPRINT "PRESS ANY KEY TO 




Al TCDMATC C T D 

HI- 1 tKNH 1 1 UK 


RANDOMIZE" 


QT NflMF 




564 A*=INKEY«: X=RND (0) : IF A*="" 


T-7« » Al * 


Al TCDMATC 1 AC 

Rl_ 1 EKNH 1 c. L.RS 


THEN 564 


T NAME 




570 * 


TQA * AM* 


ALTERNATE NUM 


5g0 ' READ DATA INTO N* ARR 


BER 




AY 


390 ' AP* 


LITERAL " 


590 ' 


400 ' AA* 


LITERAL " 


600 FOR X=l TO 50 



NORTH WEST DATA 

15% to 20% OFF 







NOW JUST: 


Donkey King 


TM 


$21.20 


Colorpede 


Int 


$25.45 


Astro Blast 


MD 


$19.96 


Doodle Bug 


CW 


$19,96 


Space Race 


Sp 


$18.65 


Planet Invasion 


Sp 


$18.65 


Pacdroids 


PG 


$15.96 


Starfire 


Int 


$18.65 


Haywire 


MD 


$19.96 



PRINTERS 

GEMINI 10 $339.95 
Serial Card for GEMINI $74.95 

Special prices in our news tetter 
that only our customers 
will know about!! 

Write or call for catalog. 

NORTH WEST DATA 

P. 0. Box 7175 Spokane, Wa. 99207-0175 
(509) 489-5133 
Add 5% for postage and handling 
Add $3 00 for C O D orders 
No C.Q.D. on PRINTERS 
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610 READ N*<X,1> 

620 IF N«<X, 1>*"XXXXX" THEN 650 
630 READ N««X t 2):R-R+l 
640 NEXT X 
650 * 

660 » INPUT RUN DATA 

670 • 

6B0 CLSsPRINTSB, "* LAB PLANNER * 

690 PRINT840, " " 

700 PRINT896, "HOW MANY SESSIONS" 
»: INPUT SS 

710 PRINTQ160, "HOW MANY WORK STA 
TIONS" f : INPUT 3 

720 PRINT9224, "HOW MANY ALTERNAT 

ES"i:INPUT A 

730 SC-SC+l:60SUB 1320 

740 IF SC > S3 THEN 1090 

750 CLS: INPUT "SESSION DATE" 5 D* 

760 PRINT: INPUT "SESSION START T 

I ME"i SI* 

770 PRINT: INPUT "SESSION STOP TI 
ME" ! S2* 

780 PRINT: PRINT "SET TO TOP OF F 
ORM" 

790 PRINT" THEN PRESS <ENTER>" 
800 INPUT A* 
810 GOSUB 1110 



820 
830 



650 



— CHECK STATUS 8e SELECT 



660 ■ << HAS EVERYONE HAD A PRIM 
ARY CHANCE? » 
870 * 
080 Z"0 

890 FOR X-l TO R 

900 IF N(X,1>«1 THEN 920 

910 Z=Z+1 

920 NEXT X 

930 IF 2O0 THEN 950 
940 QQ=l:SOTO 1560 
950 IF Z<S THEN 1750 
960 FOR Cl=l TO S 
970 SOSUB 1660 
980 NEXT CI 
990 ' 

1000 ' « SELECT ALTERNATES » 
1010 ' 

1020 GOSUB 1690 
1030 GOSUB 2020 

1040 PC=0:AC»0:IF <SC+1> > SS TH 
EN 1090 

1050 CLSIPRINTQ96, -SESSION NUMBE 
R "MSC+1> 



DA TABASE / MAILER - 'CC-DBM' 
LETTER WRITER - CC - L W 

introductory offer - FREE! CC-LW 



. . . $49.95 
. . . $39.95 

Tof CC-DBM 



Databaeo/Mailer "CC - D8M" 



16Kor 32K 



• Simple to use even for the novice 

• Active Main Menu guides user to valid operations. 

• 32K disk (or tape) appro*. 59, {61} to 338, (351) records. 

• 16K disk (or tape) approx. 12, (15) to 72, (86) records. 

• 4 to 10 fields, 5 to 27 widths, 20 to 270 char /record. 

• All user definable with default values for ease of use. 

• Automatic memory sense adjusts to the size of your system. 

• Fast Basic sort by any field with "Percent Sorted" display. 

• Automatically adjusts for empty address lines - no gaps. 

• Print up to 9 line labels on envelopes or mailing labels. 

• Optional special printer codes for customized labels. 

• Master printout with 2 column format including field name. 

• Automatically prints header with date, paging and filename 

• Works with any printer, use friction or tractor feed. 

• Selective printing by any field or field range. 

• Optional multiple copies of mailing labels. 

• Single screen 10 record display by user defined field. 

• Single key entry provides hard copy of screen data. 

• Comprehensive 26 page users manual with flow diagrams. 

• Includes deteiled inatructiona for user modification. 

• Compatible with CC-LW for mail-merge, form letters, etc. 



Utter Writer "CC - LW" 



• Much easier to use than a 'word processor.' 

• Allows fast single page letter writing. 

• Embedded commands for centering, multiple line skip, 
tabbing and wordwrap 

• 16Kor32K tape or disk. 

• Edit mode allows you to delete or insert text, 

• Uses CC-DBM data files for form letter capability. 

• Works with any printer and standard paper. 

• Excellent users manual. 

CC - DBM 16K, 32K disk or tape 949.95 ^ 
CC-LW 1 6K, 32K disk or tape »39.95 
PLEASE SPECIFY TAPE OR DISK - ^ 
To order, send check or money order to: 

EVS Engineering , _ 

_„ _ . „ ... a _ . Include $2 postage 

9528 Suite 35, Miramar Road & handing. 
San Diego, CA 921 26 U.S. Dollars only. 
Or check yeur local sofiwara dealer, tot Questions, credit card 
orders, call (619) 566-6013 or (619) 695-1386 on weekdays 
B A.M. to 4 P.M. PST. We will be glad to help. 
Dealer inquiries invited. 
California residents please add sales tax - 6%, 
Allow 2 weeks for personal checks. No Cash, No C.O.i. s 
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1060 GOTO 710 
1070 ' 

1080 * END PROGRAM 

1090 ' 
1100 END 
1110 * 

1120 ' PRINT HEADER ROUTINE 

1130 ' 

1140 PRINT#-2," ":PRINT#-2, " " 
1150 PRINT#-2, TAB (31 ) "LAB SESSIO 
N ROSTER" 
1160 PRINT#-2," " 

1170 PRINT#~2,TAB<B) "DATE! " 1 D* 
11B0 PRINT#-2,TAB<56) "TIME: ";S1 
TO ";S2* 

1190 PRINT#-2, TAB(B) "SESSION NUM 
BER "?SC 

1200 PRINT8-2, " " 

1210 PRINT#-2, TAB (11) "PRIMARY SE 
LECTIONS "; 

1 220 PR I NT#-2 , T AB < 54 > " ALTERNATES 

1230 PRINT#-2,TAB<10> " 

— " i 

1240 PRINT#-2,TAB(53>" 

1250 RETURN 
1260 * 



1270 * PRINT DETAIL ROUTINE 

1280 * 

1290 PRINT#-2,TAB<8>Cli". "IPL*I 
% M IPFt| 

1300 PRINT#-2,TAB(51)AN«;AP*I AL* 

;aa«;af« 

1310 RETURN 
1320 * 

1330 * INITIALIZE SELECT FL 

AGS 

1340 * 

1350 FOR X»l TO R 
1360 N(X,0)-0 
1370 NEXT X 
1390 RETURN 
1390 • 
1400 * 

1410 DATA *##### 

♦♦♦♦ 

1420 ' 
1430 ' 

1440 DATA ARMANDARI Z , MYRA, ARMSTR 

ONG, AUDREY, BAUER, BARBARA 

1450 DATA BROWN, DANNETTE, BROWN, T 

HOMAS, BURR, MARILYNN 

1460 DATA CASS I DY, KAY, CON I AN, SHE 

RRY, COOK, PATRICIA 

1470 DATA DAVIS, JANE, EVANS, JOAN, 




• ventilator holes 
. slot for ROM pack 

Colors available: Ivory, smoked gray 

deduct $1.00/sf and lor clear 

1 Year guarantee on plastic and workmanship. 

Stand may be returned within 30 days tor refund If not satisfied. 


Shipping 


IL RMidenteAdd 6% 


Tot* 








[jp n | nowara Meaicai company 




U b 1 Box 2 Chicago, Illinois 60690 


Zip - 




We pay shipping on pi»-paW orders 
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GOLL I HARE, WILLIAM 

1480 DATA HENDR IX, WARD, HEYMAN, KA 
THY, JUDGE, CATHY 

1490 DATA KOEN I G , SUE , MAC Y, KARL A, 
MARTIN, ROSEMARY, MASON, RIC, MATECK 
I , GRACE 

1S00 DATA MCCARTHY, THOMAS, MENDOZ 
A, HENRY, MROSKI , MELODY 
1510 DATA NASH, LOIS, NELSON, DEBBY 
, NELSON, MARK 

1520 DATA SANDERS, CHARLES, SATTER 
FIELD, CRAIG, SATTERF I ELD , JANET 
1530 DATA SCIOTTA, KATHY, STAUBER, 
MARIE, THORLEY, EDMUND 
1540 DATA ZELINSKI, PAT, MARTIN, MA 
R I ANNE 

1550 DATA XXXXX 
1560 ' 

1570 ' EVERYBODY IS ELIGIBL 

E FOR PRIMARY SELECTION 

1580 ' 

1590 FOR C2-QQ TO S 

1600 SL-RND(R) 

1610 IF N(SL,0)=1 THEN 1600 

1620 PT*(C2,0)=N*<SL, 1>:PT*(C2, 1 

)=N*(SL,2) 

1630 N(SL,0)=l:N(SL, 1)=1 
1640 NEXT C2 



PAY WHAT YOU WANT 

for home ond business software 
RSCoCo and TDP-100 

1 6/32K Disk or Cossette 
Extended Color Basic Required 



1650 GOTO 1020 
1660 ' 

1670 ' NORMAL PRIMARY SELEC 

TIONS 

1680 ' 

1690 SL»RND(R) 

1700 IF N(SL,0>=»1 THEN 1690 

1710 IF N(SL,1)=1 THEN 1690 

1720 PT*(C1,0>-N*(SL,1>:PT*(C1,1 

>-N«(SL,2) 

1730 N(SL,0)=i:N(SL, 1)=1 
1740 RETURN 
1750 ' 

1760 * SCHEDULE REMAINDER - 

1770 ' 
1780 C3=l 

1790 FOR C5=l TO S 

1800 IF N(C3,0)=1 THEN 1850 

1810 IF N(C3, 1)=1 THEN 1850 

1820 PT*(C5,0)=N«(C3, 1):PT«(C5,1 

)=N*(C3,2) :N(C3,0) = l:N<C3, 1) = 1 

1830 C3=C3+l:lF C3 > R THEN 1870 

1840 NEXT CSIGOTO 1020 

1850 C3=C3+l:lF C3 > R THEN 1880 

I860 GOTO 1800 

1870 QQ=C5+l:GOTO 1560 

1880 QQ=C5:GOT0 1560 

1890 ' 

1900 » SELECT ALTERNATES — 

1910 ' 

1920 FOR Cl=-1 TO 20 

1930 AT«(C1,0>- AT«(C1,1)=" " 

1940 NEXT CI 

1950 FOR Cl=l TO A 

1960 SL=RND(R) 

1970 IF N(SL,0)-1 THEN 1960 

1980 AT* (CI ,0)=N*(SL, 1 ) :AT*(C1 , 1 

>=N*(SL,2) 

1990 NCSL,0>=1 

2000 NEXT CI 

2010 RETURN 

2020 * 

2030 ' SET UP DETAIL ROUT IN 

E 

2040 ' 

2050 FOR Cl=l TO S 
2060 PRINT#-2," " 

2070 PL«=PT* ( C 1 , 0 ) : PF»=PT* ( C 1 , 1 ) 
2080 IF CI > A THEN 2110 
2090 AN*=STR*(C1):AP*=". ":al»=a 
T* ( C 1 , 0 ) : A A*» " , " : AF*« AT* < C 1 , 1 > 
2100 GOTO 2120 

2110 AN*=" ":AP*«=" ":AL*=" ":AA* 
= " ":af*=" 

2120 GOSUB 1260 
2130 NEXT CI 
2140 RETURN 



BUDGET RECORD 

income b outlay by 99 categories Green for taxes. 02k 

MAILING LIST 

Mahes icbels. p.in;c»j!i ond alphabetized iis;s. M/L sort. 

APPOINTMENT BOOK 

font a ccienrks- w.th nny number ot memos/ day ramies 
printer with compressed diarocters) 

GRADE BOOK 

Moke roBs & grade sheets, complete with stats end totals 

ALSO AVAILABLE 

Phone Book. Soles Retwd Cor Repairs, Diet Delight Grocery List. 
The Fine Prirrti 

Orde rwc p. 3»uro nsawruim ierxt 1f.ppt.1g/hor.dBn9 in odvonc* 

Ct— ^4 00. 2— So.00) After using the program, pay- si-..y wt ui the pojicm 

is w<_ ih ,-a.r tei 1 r.y oppf.-ing -ght livelihood to the softcore a.duitr/ 

Specify 16/32K ond type of printer. 



Bruck Associates 
660<? Westmoreland Ave. 
TakomoPork. MD2UV12 
(301) 270-5622 



Free eclogue on request 
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CoCo COUNSEL 



Copyrighting Ybur Software 
Part 1 



By Tom Nelson 

Rainbow Contributing Editor 



"fS^^e^i^m-ii^iia^ Copyright tmht-B? 

. jritmtrtUM dealing wfithf&Oftwa « -.^ MlK^I wrfr ■ a &.»svV}«M»r " 
CPrttemptecd-in thc.Coaai^o^ vv'h^h ate* s Gen jrm tu 




■tiEti filing the w'6» fc..oreV»iT 
itoul. b*c&eefrl'tafeictud< 

J-."-"' Iri Ito ib. first uw ? • jjj- in r-.qr> prsgrrmi - watd 




•Copyright few- i* designed it. ^« ft wor^.^"»u^ftj#jp -, 
Sfaec^om^tsr programs axe tfferfes „t -if ItyrSlftpUv* m 

^^^^^fe ^ t i^-.g%m^tfer jHT sggffis w drift ed. 

r/Vwi AW.Vfwr was former,') a Spa in! Assistant Attor- 
ney General. lor the State of Minnesota. He currently is 
General Counsel fur Soft law Corporation, makers of 
the Super "Color" Library.) 
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"Copyright © 1983 by E. Z. Pickler." This form may he 
shortened to eliminate the word "Copyright," but the "©" 
symbol, the date and the attribution must be there. Just to 
add a little fun, you have to be careful about how the 
copyright notice is written if you are marketing your pro- 
duct in international markets. The requirements vary with 
the country, and are often dictated by international copy- 
right conventions subscribed to by a large number of coun- 
tries. Cross that bridge when you have to. If you need some 
immediate advice, however, contact a copyright attorney to 
check on your particular problem. 

As I said, your program does not have to be registered 
with the Copyright Office in order for you to benefit from 
the protection of the copyright laws. So why register? 
Because some of the protections afforded by the copyright 
laws will not apply unless you register. In particular, you 
cannot obtain attorney's fees and court costs for violations 
which occur after the first 90 days subsequent to first publi- 
cation of the program unless you register. This is very 
important, since often attorney's fees can be so great that 
they actually prohibit you from hringing any action unless 
you ean eount on being reimbursed when (and if) you win. 

Before you rush out and register your copyright for that 
program, you'd better consider whether you want copyright 
protection at all. That's right. It is entirely possible that you 
may decide that copyright protection is not exactly what you 
want for your program. Although I do not feel it wise for 
anyone to make that decision before eonsulting an attorney 
who specializes in intellectual property law, you should at 
least have an idea of the basic consideration involved in the 
decision. 



Copyright protection is just one means to protect your 
software creation. Another popular legal shield ts trade 
secret protection. Trade secret protection is afforded those 
who keep a piece of inf ormation secret. It provides a remedy 
against the unauthorized disclosure of trade secrets. 1 will 
discuss this topic later. Here, suffice it to say that the essen- 
tial element of trade secret protection is total unavailability 
of your program to the public. Copyright law is almost the 
antithesis of this concept. When you copyright a piece of 
software you are usually selling the object code to the public. 
This is making your program public. In fact, if you register 
your program with the Copyright Office, this is arguably a 
publication of your program to the public. How can any- 
thing explicitly made public be considered a trade secret? 

Many authoritiesf eel that if the source code, your assem- 
bly language program, is kept secret, copyright of the object 
code alone is not sufficient to destroy trade secret protection 
for your program since object code is not direetly translata- 
ble into your precise source code. Like other areas of copy- 
right law in relation to computer software, this thesis is 
untested, and you should weigh carefully the factors in 
deciding whether to register your eopyright in your pro- 
gram. If trade seeret protection is more important to you 
than eopyright protection, perhaps you will not wish to 
register your copyright in the program, but instead will rely 
on the trade secret protection provided by the laws of your 
state. Again, you will want to consult with you attorney 
before making a final decision. 

Actual registration requirements will be left to next 
month's column. Here let's discuss a bit more what the 
copyright laws will and will not do for you. 




CIRCLE CITY 
SOFTWARE 

NEW ADDRESS: 
1210 Victoria Drive 
Lebanon, Indiana 46052 



SEA TRADER 

A new game in which you play an 18th cen- 
tury sea captain plying the trade routes. 
The you start start out on a shoestring 
and try to become a billionaire. Hazzards 
include pirates, storms, bad markets, 
and bad debts. People have become 
so fascinated with this game that 
they actually cheat to keep from 
winning. 16K color basic, tape or disk 
$19.95. 

COLOR STAR PILOT 

Take a trek through space to defeat the 
alien enemy in this superior version of 
a classic space game! Reviewed in Rain- 
bow. Requires extended basic. Comes 
with 32K 3-level game or 16K novice 
Tape or disk $19.95. 



4 




NEW MASTER DISK $29.95 

A touch of a button allows you to keep tabs 
on your disk library. Creates directory files 
directly from 100 of your source disks on one 
Master Disk. Search by file name, file type, 
disk name, free space, or individual directory. 
All output can be sent to line printer. Menu 
driven and very user friendly I This is an im- 
proved version of the program reviewed in The 
Rainbow. Optional accessory package adds 
even more features. 16K or 32K disk required. 

ACCESSORY PACKAGE $20.00 

A second disk for improved versions of the or- 
iginal single-disk accessory programs. Includes 
notebook for storage of disks and paperwork. 
•SORT* 

New Sort program is faster and more efficient 
than original version. Runs in 16 or 32K to 
produce an alphabetic listing of all file types 
you specify. 

♦RECOVER* 
New Recover program not only rewrites direc- 
tories from master files but can rebuild an en- 
tire disk to eliminate "10" errors. 

*ZAP« 

New addition. User friendly directory Zapper 
to manually correct directory data when all 
else fails. Menu-driven with help files for 
novices. 
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Copyright protection protects the actual expression of 
ideas, but not the ideas themselves. This is a crucial d ist inc- 
tion, especially with games. An idea is a concept or a gener- 
alized schema relating to a specific topic. The expression of 
an idea is just that; your particular manif estation of the idea. 

This distinction can be shown best with the s»-ealled 
"maze~chaj5e"games. There are many maze-chase games of 
the Pac Man™ variety in which some beasty chases a gob- 
blinggood guy which innocently ismunching some goody or 
other. Thegoodguycaneat a power pill orthe like to beable 
to eat the beasty, and so on and so forth. We've all played 
this one a thousand times. What 1 have just deseribed is the 
idea of agame,a eoncept. Thisconeept is not copyrightable. 
If it were, the first to think of it could unfairly corner the 
market on an idea, stopping others from using it in any way 
in the future. 

Copyright law was not designed to provide this protec- 
tion; patent law was. Patent law, however, docs not apply to 
this kind of application software. (This will be discussed to 
some extcut in a later column.) Instead, copyright law was 
designed to protect an author's particular expression of the 
idea. Thus, courts have devoted much effort to determine 
what is the expression in each particular case, and whether 
there has been an infringement of that expression. I will tell 
you the saga of Pae Man T " in a later column to show just how 
the courts have dealt with the "knock off" problem in the 
software area. 

By now you are beginning to get a feeling that eopyright 
law may not be very clean cut and si mple. In the computer 
software arsa, an especially new and complex area, this 
feeling is well founded. Copyright law was not welldesigned 



for computer sof tware which is a hybrid kind of intellectual 
property. Software is too new, too novel even for the new 
1976 and 1981 additions to the copyright law. 

Copyright law f or software grew out of sof tware f or huge 
mainframes. No thought has been devoted to the special 
problems inherent in microcomputer software which is 
increasingly taking a larger market share, and there are real, 
different problems. Mainframe software was and isdesigned 
to be user modifiable. Customization is presumed. Custom- 
ization of microcomputer software is not presumed; quite 
the opposite is true. It is assumed that the user will find the 
offered software totally sufficient for his or her needs. If this 
is not true, another piece of software is sought and bought. 
Sinee microcomputer software is relatively cheap, this has 
become the standard business practice. 

Thus, copyright laws designed for mainframes cannot 
hope to be directly applicable to microcomputers. Yet, the 
copyright laws have not changed. There is much growing to 
bedone in the nextf ew years in the software industry and in 
the laws relating to the protection of software. You, as an 
author, can play a significant part in that growth. You can 
help to shapethe softwareand the laws of the future to make 
your efforts ever more rewarding and profitable. 

In my next column 1 will discuss the steps for registering 
the copyrights f or your p rograms. I n the f •Mowing months I 
will discuss more about how the copyright laws work to 
define the author-publisher relationship. For those of you 
who can't wait, try to find the work The Copyright Kit: How 
to Copyright Your Computer Software by Noel D. Adler 
and Steven A. Novani, National Attorneys* Publications, 
Inc., 1981. Until then, good computing 



VOICE RECOGNITION 

For your 16K TRS.-80 Extended Basic Color Computer 
By Cary D. Perttunen 



Using your cassette recorder's condenser microphone, the COLOR TALK TO ME software 
package can let you use your own voice as an alternate means of input for any of 
your BASIC programs. Over 200 words can be stored in 16K RAM. With a little 
practice, you can attain from 80% to over 90% accuracy for most applications. 

The COLOR TALK TO ME Software Package includes: 
-COLOR TALK TO ME machine language subroutine 

-The BASIC subroutine which can merge COLOR TALK TO ME with your programs 
-Complete instructions on how to use and incorporate COLOR TALK TO ME 

in BASIC programs 
-Two application programs: 

1, VOICE CALC- Use your voice to enter arithmetic problems and VOICE CALC 

will display the solution. 

2. CREEN PAWTER- Say a color and the screen will be painted that color. 

ALL OF THIS ON TWO CASSETTES FOR ONLY $49.95!!! 

ColorSoft Software Co. will soon be releasing voice recognition programs which can be used 
once you buy COLOR TALK TO ME. Coming soon: Connect More, Crosswords <5e more! 

ATTENTION PROGRAMMERS: ColorSoft Software Co. will market original voice recognition 
programs using COLOR TALK TO ME with excellent royalties in return. 

Dealer Send check or money order to: ColorSoft Software Co, 
Inquiries Add $2.00 shipping 11764 Raintree Ct. 
Invited Ucica, MI 48087 
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Software RevletrZ 



Spectran Offers New 
Dimension to Spectaculator 



Sometimes it's hard to cope with the frustration of 
incompatible software. Having two useful programs which 
can't talk to each other is like being in a foreign country. You 
really need a translator to get things going. Spectran solves 
the problem of data incompatibility when loading Spectacu- 
lator files into a word processing program. Most word pro- 
cessors, including Radio Shack's Scripsit, expect ASCII 
text files. Spectaculator produces its own unique files. 

Spectran translates Spectaculator files into standard 
ASCII files or vice versa. Thus, you can easily incorporate 
spreadsheet data into a report prepared with a word process- 
or, or you can add data from a text file to a new spreadsheet 
model. This flexibility makes a wide range of applications 
available to the Spectaculator user. 

Running Spectran is easy. You select menu options (1) 
Spectaculator to ASCII or (2) ASCII to Spectaculator file 



(617) 339-3734 

We Specialize In Color Computer Programs 
Call or Write For Our Catalog 

ARCADE STYLE UTILITIES EDUCATIONAL 



Pac Altac 
Galax Atlax 
Storm 

ADVENTURE 

Madness & 
Minatour 
Keys of the 

Wizard 
El »iablar» 



Tape to Disk Spelling 
Disassembler Math 
Assemblers Geography 



Budget Word Processing 
Household 

Inventory 

Expense 



Over WO Different Programs in Stock' 



200 Chauncy Street 
Mansfield, MA 02048 



conversions. For option (1) you set a line length for the 
converted file (32 to 132 columns wide) and then give the 
name/ SPC of the Spectaculator file to be converted. The 
program directs you to change to your word processing disk 
and to name the new ASCII file. The newly converted file is 
then written and you are ready to edit or incorporate the 
data into a report. 

Option (2) reverses the above process and allows you to 
convert an ASCII file to one which can be read by Spectacu- 
lator. The new Spectaculator file has columns set to width 
ten. Only data values or text are transferred. You cannot 
transfer equations as column or row relationships. 

The whole process is straightforward. The instructions 
thoroughly cover all the operating points. There are only 
three basic limitations, which are discussed in the instruc- 
tions. First, the program only runs from files stored on 
Drive 0 (obviously not a problem for most of us single drive 
users). Second, the maximum width of a ASCII data 
column is 1.0. Files will still require some reformatting when 
entered into Spectaculator. Third, memory space is limited 
to 8K. for users with a I6K disk system. Larger files will lose 
data during the file transfer. 

My experience with the program emphasized the data 
formatting limitations. In going from Spectaculator to 
ASCII files, everything worked out well. But reversing the 
process eaused some minor irritations. Blank spaces used to 
justify columns of data in ASCII tables caused most of the 
problems. These blanks were converted to a single blank. In 
addition, some text headings were hopelessly scrambled due 
to the 10 character per column limit. My suggestion, also in 
the instructions supplied with the program, is to only 
transfer data tables, without text, to Spectaculator. Youcan 
add the text headings after reading the data into Spectacula- 
tor itself. 

Another problem that can cause difficulty is getting file 
types confused in the conversion process. When I specified a 
non-Spec taculator file to be converted to ASCII, the system 
crashed! Only a full, power-down reset could restore opera- 
tion. I also tried converting a non-ASCII file to Spectacula- 
tor. While the system didn't erash as before, I did get some 
nonsense results in the subsequent Spectaculator program 
run. These problems did not, however, result in any data 
being lost or in any subtle errors being propagated. 

As a bonus feature, Crimson Software offers two utility 
programs in the Spectran package. Their first bonus is Disk- 
look, a disk file utility which reads files and directory infor- 
mation, byte by byte. This program also allows you to 
modify existing disk files and ereate new directory entires. A 
nice discussion of the storage format for the CoCo disk is 
also provided. The second bonus program is Dirdupl, which 
will save a backup copy of the disk directory on unused 
sectors of traek 17. If you ever need to restore a KILLed file 
or recover a bad directory, the program willnse this backup 
copy to rewrite the original directory. 

I recommend Spectran to anyone who needs to transfer 
ASCII data to Spectaculator, or who wants to move Spec- 
taculator data, files into a word processing system. Used with 
eare, this program solves the file incompatibility problems 
inherent in Radio Shack's Color Computer software. 

(Crimson Software, 32 Beverly Heights, Tuscaloosa, AL 
35404, 16K or 32K Color Computer Disk, S25) 

—Stuart Hawkinson 
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EDUCATION 



Elements 



By Gary Benoit 



~M " dements, requiring 32K and Extended Color 

Mi basic, will be of value to all those with an 
-A— ^interest in the sciences, more specifically to 
chemistry teachers and students. 

It displays the complete periodic table of the ele- 
ments and the eight classes of elements on the graphics 
screen, in both upper- and lowercase letters. Uppercase 
letters were designed by M.H. Endres {the Rainbow, 
May 1982). I found his letters clear and eye pleasing 
and decided to use them in my program. Only one 
minor correction had to be made: his letter C DRA W 
parameters should end with BD4, not BD. Lowercase 
letters were designed by me. 

The program also provides valuable information on 
each of the 105 known and accepted elements. This 
information can be displayed on the text screen by 
simply entering the element's symbol (entering sym- 
bols can bedone whether you are in the graphics mode 
or in the text mode, ie, you can request information at 
any time after initialization). If you are in the text 
mode, simply pressing the Spacebar will return you to 
the last graphics screen displayed. Pressing the Spa- 
cebar again will advance you to the next graphics 
screen (pressing the Spacebar continuously will cycle 
the display through all nine graphics screens). Entering 
a nonexistent symbol will result in a timed "Entry 
Error" display and a return to the last displayed gra- 
phics screen. As the program requires a two symbol 
entry for the elements, you must repeat the symbol a 
second time for all single symbol elements. The total 
program design, including the liberal use of the 
1NKEYS function, has resulted in a very user friendly 
program. The extensive graphics and large amounts of 
data have a price: the program is very long (it uses most 
of the available memory in a 32K CoCo), and will 
require time and patience, not to mention accuracy, in 
ordertoenlerlhe complete listing. Forthis reason, it is 
strongly recommended that the program be entered in 
two or more steps. Needless to say, don't forget to 
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CSA VE after each intermediate step. The results are 
well worth the effort. Should you prefer to bypass all 
the physical (and mental!) labor, a copy of the program 
on cassette may be obtained from the author. Send a 
check or money order for $8 (U.S.) and write your 
address clearly. 



Table of Variables 

AS: INKEYS function 

L$(65— 90): DRA W parameters for uppercase letters 

L$(97— 122): DRA W parameters for lowercase letters 
(note: subscripts represent ASCII values) 

NS$( 1 — 105): element names and symbols 

AWS(I — 105): atomic weights 

SG$(1 — f05)specific gravities 

(note; Using string variables, as opposed to 
numeric variables (e.g. SG$), for numeric values 
allows us to represent very large or very small 
numbers in their original format. Otherwise, the 
TRS-80C would print them in scientific notation) 

ES$( 1 — 105): number of electrons in each shell 

1C$( 1 — 105): ion charges 

EN$(I — 105): electronegativity values 

OOS(f— 105): oxydation numbers 

AM$: DRA W parameters for 'Alkali' 

MT$: DRA W parameters for 'Metals' 

AE$: DRA W parameters for 'Alkaline Earth' 

TMS: DRA W parameters for 'Transition' 

OM$: DRA W parameters for 'Other' 

NMJ: DRA W parameters for 'Non' 

NG$: DRA W parameters for 'Noble Gases' 

LAS: DRA W parameters for 'Lanthanides' 

ACS: DRA W parameters for 'Actinides' 

T$: DRA W parameters for 'Periodic' 

TT$: DRA W parameters for Table* 

TVS: DRA W parameters for 'of the' 

TR$: DRA W parameters for 'Elements' 

D$,I$,K$,Q$,R$.S$: DRA W parameters for various 
spacers 
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The listing: 
10 REM elements 
15 REN GARY BENOIT 
20 REM 343 TEMPLEBY PL.N.E. 
25 REM CALGARY, AB 
30 REM CANADA T1Y 5H2 
35 REM JAN. 83 

40 CLS:PRINT8225, "DO YOU WANT IN 
STRUCTIONS?(Y/N) " 

45 A*=INKEY*: IFA*=""THEN45ELSEIF 
A*-" Y"THEN850ELSEI FA*< >"N"THEN40 
50 CLS0iPRINT6230 P "ONE MOMENT, P 
LEASE"; 

55 CLEAR1800:DIML*(122) ,NS*(105) 

, AW* (105) , SG*(105) , ESS (105) , IC*( 

105) , EN* (105) , 00* (105) 

60 FORV«65TO90:READL*(V):NEXT:FO 

RV-97T0 1 22 : READL* ( V ) : NE X Ti B0SUB4 

45 

65 FORX=1TO105:READNS*(X) , AW*(X) 
, SG* ( X ) : NEXTX : FORX* 1 TO 1 05 : READES 

*(X) :nextx:forx=itoi05:readic*(X 

) , EN* ( X ) , 00*( X ) : NEXTX 

70 REM SET UP SCREEN 

75 PM0DE4 , 1 : G0SUB8 0 : GOTO 1 00 

80 PCLS: CLS0: SCREEN0, 0:FORX=14TO 

238STEP14:LINE(X,0)-(X, 191 ) , PSET 

:NEXT 

85 FORX=42TO154STEP14:LINE(X,0>- 
( X , 61 ) , PRESET: NEXT: FORX=168T0224 
STEP14:LINE(X,0)-(X,21) ,preset:n 
EXT: F0RX*84T0238STEP 14:LINE<X,12 
2)-(X, 141 ), PRESET: NEXT: F0RX=14T0 
238STEP14:LINE(X, 142)-(X, 150) , PR 
ESET: NEXT 

90 LINE (14, 150)— (14, 191) , PRESET: 

LINE (238, 150) -(238, 191 ), PRESET: L 

INE (28,0) -(28, 21 ), PRESET 

95 FORY-21TO141STEP20:LINE(0, Y)~ 

(255, V) , PSET: NEXT: LINE (0, 150) -(2 

55, 150) , PSET:LINE(0, 171)-(255, 17 

1 ) » PSET: SCREEN 1 , 0: RETURN 

1 00 GOSUB 1 95 : GOSUB200: GOSUB205: G 

0SUB2 1 0 : G0SUB2 1 5 : G0SUB22 5: G0SUB2 

35: G0SUB255: G0SUB265 : Z - 1 

105 A*=INKEY*I IFA**"»THEN105ELSE 

I FA*=*" " THEN 1 1 0ELSE520 

110 GOSUB80:GOSUB205:DRAW"BM72, 1 

0|XAM*JXI*| XMT*; ":PSET( 109,4) :z= 

2 

115 A*=INKEY*: IFA*=""THEN115ELSE 

IFA*=" "THEN1 20ELSE520 

120 GOSUB80:GOSUB210:DRAW"BM46, 1 

0;xae*;xi*;xmt*; ":pset(83, 4) : z=3 

125 A*=INKEY*: I FA*-" "THEN1 25ELSE 



I FA**" "THEN1 30ELSE520 
130 GOSUB80: G0SUB235: DRAW"BM62, 1 
0 ; X TM* | X 1*1 XMT*» " : PSET (99,4): PSE 
T(113,4) : Z=4 

1 35 A*-INKE Y* : I FA*= " " THEN1 35ELSE 

IFA*=" "THEN1 40ELSE520 

140 GOSUB80: G0SUB225: DRAW" BM78, 1 

0? xom*? xi*; xmt*; "i z-5 

145 A*=INKEY** IFA*=""THEN145ELSE 

IFA*=" "THEN150ELSE520 

150 GOSUBB0:GOSUB215:DRAW"BM92, 1 

0;xnm*i xmt*;":z-6 

155 A*=INKEY*: IFA*='"'THEN155ELSE 

IFA*=" "THEN160ELSE520 

1 60 GOSUB80: GOSUB200! DRAW" BM80, 1 

0;xng*; »:z=7 

165 A*=INKEY*: IFA*=""THEN165ELSE 

IFA*=" " THEN1 70ELSE520 

170 GOSUB80SGOSUB255:DRAW"BM86, 1 

0; XLA*; ": PSET (137, 4) : Z-8 

175 A*-INKEY*: IFA*-" "THEN1 75ELSE 

IFA*=" " TNEN1 80ELSE520 

1 80 GOSUB80: G0SUB265 : DRAWBM94, 1 

0JXAC*; ":PSET(117,4) : PSET (131, 4) 

:z-9 

185 A*=INKEY*: IFA*=""THEN185ELSE 
IFA*=" "THEN75ELSE520 
190 REM DRAW CLASSES OF ELEMENTS 
195 DRAW"BM22, 10; XT*|BM82, 10; XTT 

*;BM123, 10;xtv*?bmi71, 10; xtr*» "i 

PSET (44, 4) :PSET(65,4): DRAW"BM5,9 
; X L* ( 72 ) ; ": RETURN 

200 DRAW"BM244,9? XL*(72) ; XD*J XL* 
( 101 ) ; BD13BL4; XL*( 78) ; XD*? XL* ( 10 
1 ) JBD12BL4; XL* (65) ? XD*; XL* (114); 
BD12BL4; XL*(75) ; XD*; XL*( 1 14) i BD1 
2BL4»XL*(88) ? XD*; XL* ( 101) ; BD12BL 

4; XL* (82) ; XD*; XL* (110);": return 

205 DRAW"BM5,30;XL*(76) ;XD*;XL*( 
105) ;BD12BL4;XL*(78); XD*;XL*(97) 
; BD12BL4; XL*(75) ; BD20BL4; XL*(S2) 
; XD*; XL*(98) ; BD12BL4; XL* (67) ; xb* 
; XL*( 1 15) ; BD12BL4; XL* (70) ; XD*; XL 
*(114) ; ": PSET (7, 32) : RETURN 
210 DRAW"BM19,30;XL*(66) ;XD*;XL* 
( 101 ) 5 BD12BL4; XL* (77) ; XD*| XL*( 10 
3) ;BD12BL4;XL*(67) |XD*| XL* (97) ;B 
D12BL4;XL*(83) ; XD*; XL* ( 1 1 4 ) ; BD1 2 
BL4| XL* (66) ; XD*; XL*( 97) ; BD1 2BL4; 
XL* (82) ;XD*;XL*(97) ; ": RETURN 
215 DRAW" BM 173, 30; XL* (66) f BR10; X 
L*(67) ;Bftl0;XL*(78) ; BR10; XL*(79) 
; BR10; XL*( 70) ; BL46BD20; XL* (83) ; X 

D*; XL* (105) ;xk*;xl*(80) ;BR10;XL* 

(83) IBR10; XL*(67);XD*|XL*(108) ;" 
: PSET (189, 52) 

220 DRAWBM201, 70; XL*(65) ;XD*; XL 
*(115) ;XK*jXL*(83) 5 XD*; XL* (101) J 

xk«; XL* (66) ; xd*; XL* (114); blisbdi 
2; xl* (84) ; xd*; XL* ( 101 ) ; xk*; XL* (7 
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3) ; BD20BL4 ; XL* (65) ; XD* ; XL* ( 1 1 6) ? 
" : RETURN 

225 DRAW"BM173,50;XL*(65) ;XD»; XL 
*(108) ;BD12BL18;XL*(90) ;XD»; XL*< 
1 10) ; XK*; XL*<71 ) J XD*; XL*(97) I XK* 
;XL*(71) ;XD*;XL*(101);BL32BD12;X 
L*(67) | XD*;XL*(100) ; XK*; XL* (73); 
XD*;XL*(110) i xk*;xl*(83);xd*;xl* 
(110) ; " 

230 DRAW"BM201,90;XL*(83); XD*;XL 
*(98) ;BL46BD12;XL*(72) ;xd*;xl*(1 
03);xk*;xl*(84);xd«;xl*(108);xk» 
;xl*(80);xd*;xl*(98);xk*;xl*(66) 
; xd*; xl* ( 105) ; xk*; xl*(80) ; xd*; xl 

*(111) ;":PSET(203, 112):RETURN 
235 DRAWBM33 , 70 1 XL* (83 ) ; X D*; XL* 

(99) ; xk*; xl* (84) ; xd*; xl*(105) ; xk 
*; XL* (86) ;BR10;XL*(67) ; XD*;XL*(l 
14) ; XK*; XL* (77) I XD*; XL* (110); XK* 
} XL* (70) I XD*} XL* ( 101 ) t XK** XL* (67 

) ; xd*; XL*(iii) ; ":PSET(49, 72) :pse 

T (133, 72) 

240 DRAWBM131 , 70; XL* (78) ; XD*; XL 
*(105) ;XK*|XL*(67) ; XD*| XL* (117) I 
BL116BD12|XL*(89) I BR10; XL*(90) | X 

d*;xl*(114);xk*;xl*(78);xd*;xl*( 
98) ; xk*; XL* (77) ; xd*; XL* (ill); xk* 
;xl*(Q4);xd*;xl*(99); " 

245 DRAW" BM 103, 90; XL* (82) ; XD*; XL 



ACTIVE and /or PASSIVE LINEAR 
ELECTRONIC CIRCUIT ANALYZER 

MX EXTENUEIf 5*SIC CASSETTE FEATURES : 
icircuit editor; tape save and load 
icotpute gain and phase versus frequency 
:output to screen, printer, ar cassette 
tfile listinq utility to screen or printer 

ADO 32K DISK BASIC FEATURES i j^Ss 
:prograa and data chaining via disk JCnw 
:euch larger circuit files possible 
icotputf circuit dela? versus frequency 
iprinter utility to graphically plot 
circuit respens? to any ASCII printer 



CASSETTE--W4.95 MSK--I34.95 
add i2 for shipping cr 14 for C.O.D 
24 hour CCD order tspe iW) 470-3801 



DIGITAL-LINEAR SYSTEMS ENG. 
P.O. Box 754 

NATIONAL CITY, CALIF. 92050 
custom engineering services 



*(117) ;xk*; XL*(82); XD*»XL*(104); 
xk*;xl*(B0) ; xd*; xl* ( 100) ; xk*; xl* 
(65) ; xd*; xl*(103) ;BLH6BD12; xl*< 
76) ;xd*;xl*(97) ;xk*; XL* (72) ; xd*; 

XL*< 102) ; XK*; XL* (84) ; XD*; XL* (97) 

; " 

250 DRAWBM75, 1 10; XL* (87) ; BR10; X 

L*(82) ;xd*;xl*(101);xk*;xl*(79); 
xd*;xl*(115) ;xk*;xl*(73>;xd*;xl* 
(114); xk*;xl*(80); XD*; XL*(H6);x 
K«; XL* (65) ; XD*; XL* ( 1 17) ; BL 1 16BD1 
2; XL*(65);XD*;XL*(99) ;XK*;XL*(82 

) ; xd* ; XL* ( 102) ; xk*; XL* (72) ; xd*; x 

L*(97) ; ■: RETURN 

255 DRAW"BM33, 159; XL* (67) ; XD*; XL 

*(101);xk*;xl*(80) ;xd*;xl*(114) ; 
xk*; XL* (78) ; xd*; XL* ( 100) ; xk*; XL* 

( 80 ) ; X D* t XL* ( 109) ; BR9BU8 ; XL* ( 83) 
5 XD* ; XL* ( 109) ; BR9BU8 » XL* (69) ; XD* 

; XL* (117) ;xk*;xl*(71)» xd*;xl*(10 
0) ; XK*; XL* (84 ) ; XD* ; XL* ( 98 ) 1 " 
260 DRAW "BM145, 159; XL* (68) I XD*; X 
L*(121 );XK*} XL*(72) j XD* 1 XL* ( 1 1 1 ) 

; xk*; xl* (69) ; xd*; xl* ( 1 14 ) 1 xk*; xl 

* (84) ; XD*; XL*( 109) ; BR9BU8; XL* (89 
) ; xd*; XL* (98) ; xk*; XL* ( 76 ) ; xd* ; XL 
*(117);":RETURN 

265 DRAW BM33, 180; XL* (84) ; XD*; XL 
* ( 104) ; XK*; XL* (80) j XD*| XL* (97) ; X 
K*; XL* (85) ; BR 10; XL* (78) ; XD*; XL*( 
112); xk*; xl*(80);xd*;xl*(117) ; xk 
*;xl*(65) ; XD*; XL*( 109) ; BR9BU8; XL 
* (67) ; XD* ;XL* ( 109) ; BR9BU8; XL* (66 

) ;xd*;xl*(107) ;•■ 

270 DRAW "BM145, 180; XL* (67) ; XD*; X 
L*(102) ;xk*;xl*(69) ;xd*;xl*(H5) 
; xk*; XL* (70) ; XD*; xl*( 109) ; BR9BUS 
;xl*(77) ;xd*;xl*(100) ;xk*;xl*(78 
) ; xd*; xl* ( 1 1 1 ) ; xk*; xl* (76) ; xd*; x 
L*(ii4) ; ":return 

275 REM DRAW LETTERS 

280 DATA"U4E2F2D2L4R4D2" „ "RU6LR3 

FDGL2R2FDGL3BR4 " , "BR4BU6L2HU4ER2 

FDBD4" 

285 DATA"RU6LR3FD4GL2BR3" , "U3R4L 
4U3R4BD6L4R4" , "U3R4L4U3R4BD6" , "B 
R2BU3R2D2GL2HU4ER2FBD5 " , "U6D3R4U 
3D6 ", " BRR2LU6LR2BRBD6" , "BU2DFR2E 
U5BD6" , "U6BR4G3F3" , "R4L4U6BR4BD6 
" , "U6F2E2D6", "U6DF4U5D6" , "R4L4U6 
R4D6" 

290 DATA"U6R3FDBL3BR4BD3" , "BUU4E 
R2FD48L2HBR2BUF2" , " U6R3FD8L3RF3" 
, "BUFR2EUHL2HUER2FBD5" , "BU6R4L2D 
6BR2" , "U6D6R4U6D6" , " BU6D4F2E2U4B 
D6", "U6D6E2F2U6D6", " UE2H2UDF2E2U 
DG2F2D" , " BU6DF2E2UDG2D3BR2 " ^ "BU6 
R4DG2LR2LG2DR4 " 

295 DATA" BU4R3FD2GL2HUR4BD2" , "US 
D2R3FDGL3BR4 " , " BUU2ER3BG3BLFR3 " , 
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" BRHUER3U2D5L3BR 3 " , " BRHU2ER2FDL2 
BF2L3R3" , "BR2U5EBD3L2BR3BD3" , "R3 
EU3HL2GDFR2EBD3" , M U6BD3R3FD2" , "B 
RRU4LRD4RBR " , "BUFREU3LR2BD4" , "BR 
U5BR3G3RF2" , " BRRU5LRD5RBR " , " BLU4 
R3D4U4R3D4" 

300 DATA"U4R3FD3 " , " BRR2EU2HL2GD2 
FBR3", "U5R3FDGL3BD2BR4" , "BR4U5L3 
8DFR3BD2" , H U4DER3BD4 " , "R3EUL4UER 
3BD4", "BU4R3L2U2D5FRBR", "BU4D3FR 
2EU3D4" , "BU2U2BR4D2G2H2BR4BD2" , " 
U4BD4E2F2U4BD4" , "E4BL4F4" , "E4BL4 
F2BF2" , " BU4R4G4R4" 
305 REM ELEMENT INFO 
310 DATA HYDROGEN h, 1 .00797, 0. 00 
009, HELIUM he, 4. 0026, 0.00018, LIT 
HIUM li, 6. 939, 0.534, BERYLLIUM be 
,9.01222, 1.85, BORON b, 10.811,2.4 
5, CARBON c, 12. 01 11, 3. 52, NITROGEN 
n, 14.0067,0.00125, OXYGEN o,15.9 
994, 0.00 1429, FLUORINE f, 18.9984, 
0.0017 

315 DATA NEON ne, 20. 183, 0.0009, S 
ODIUM na, 22. 9898,0.97, MABNES I UM 
mg, 24. 312, 1.74, ALUMINUM al,26.98 
15, 2. 70, SILICON si, 28.086,2. 4, PH 
OSPHORUS p , 30. 9738 , 1 . 83 , SULFUR s 
,32. 064, 2.0, CHLORINE cl, 35. 453,0 
.0032,AR6ON ar, 39. 948, .00178 
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320 DATA POTASSIUM k , 39 . 102 , 0. 86 
, CALCIUM ca, 40. 08, 1.55, SCANDIUM 
sc, 44.956,2.5, TITANIUM ti,47.90, 
4.5, VANADIUM V, 50. 942, 5. 96* CHROM 
IUM cr, 5 1.996, 7. 1, MANGANESE mn,5 
4.938,7.2, IRON f e, 3ft, 847 , 7 . 87, CO 
BALT co, 58. 9332, 8. 9, NICKEL ni ,58 
.71,8.9 

325 DATA COPPER cu, 63 . 54 , B .92 , Z I 
NC zn, 65. 37, 7. 14, GALL IUM ga,69.7 
2,5.9, GERMANIUM ge, 72.59,5. 36, AR 
SENIC as, 74. 9216,5. 7, SELENIUM S« 
,78. 96, 4.8, BROMINE br , 79 . 909, 3. 1 
2, KRYPTON kr, 83.80,0. 0037, RUBIDI 
UM rb,B5. 47, 1.53, STRONTIUM sr,B7 
.62,2.6 

330 DATA YTTRIUM y ,88 . 905, 3. 8, 2 I 
RCONIUM zr-, 91. 22, 6. 4, NIOBIUM nb, 
92. 906, 8.4, MOLYBDENUM mo, 95.94,1 
0.2, TECHNETIUM tc , < 97 ) , , RUTHENI U 
M ru, 101. 07, 12. 2, RHODIUM rh, 102. 
905, 12.5, PALLADIUM pd, 106.4, 12.1 
6, SILVER ag, 107.87, 10.5, CADMIUM 
cd, 112.40,8.65 

335 DATA INDIUM ih, 1 14-82, 7.3, TI 
N sn, 118.69, 7. 3, ANTIMONY sb,121. 
75, 6. 684, TELLURIUM t e, 1 27. 60,6 . 2 
4, IODINE i , 126.9044,4,93, XENON X 
e, 131 .30,0.0058, CESIUM cs, 132. 90 
5, 1.9, BARIUM ba, 137,34, 3.5, LANTH 
ANUM la, 13B*91,6. 15, CERIUM ce,14 
0. 12,6.9 

340 DATA PRASEODYMIUM pr, 140.907 
,6.5,NE0DYMIUM nd , 144 . 24 , 6. 9 , PRO 
METHIUM pm, (145) SAMARIUM sm,15 
0.35, 7.7, EUROPIUM eu, 1 51 . 96, , GAD 
OLINIUM gd, 157.25, , TERBIUM tb,!5 
8.924, , DYSPROSIUM dy, 162. 50, , HOL 
MIUM ho, 164.930, , ERBIUM er,167*2 
6,4.77 

345 DATA THULIUM tm, 1 68. 934, , YTT 
ERBIUM yb, 173. 04, 5. 51 , LUTET IUM 1 
u, 174.97, , HAFNIUM h-f , 178. 49, , TAN 
TALUM ta, 180. 948, 16. 6, TUNGSTEN w 
, 183.85, 19. 3, RHENIUM re, 186.2,20 
.53, OSMIUM os, 190.2,22.57, IRIDIU 
M ir, 192. 2, 22. 4, PLATINUM pt, 195. 
09,21.37 

350 DATA GOLD au, 196.967, 19. 3 ? ME 
RCURY hg, 200. 59, 13. 5 5, THALLIUM t 
1,204.37, 11. 85, LEAD pb,207.19,ll 
.34, BISMUTH bi,208.98,9.8,PQLONI 
UM po, (210) ,, ASTATINE at, (210),, 
RADON rn, (222) ,0. 00973, FRANCIUM 
fr, (223) , , RADIUM ra, (226) ,5.0 
355 DATA ACTINIUM ac, (227) , ,THOR 
IUM th, 232. 038, 11. 2, PROTACTINIUM 
pa, (231) URANIUM u, 238. 03, 18-7 
.NEPTUNIUM np, (237) , .PLUTONIUM p 
u, (244),, AMERICIUM am, (243) CUR 



IUM cm, (247) , , BERKEL I UM bk, (247) 
,» CALIFORNIUM Cf , (251) , , EINSTEIN 
IUM es, (254) , 

360 DATA FERMI UM fra, (257), „ MENDE 
LEVIUM md, (258) , , NODELI UM no, (25 
5) , , LAWRENCIUM lr OR lw, (256) , ,R 
UTHERFORD I UM rf , (261) , , HAHNI UM h 
a, (262) , 

365 REM ***ENTER FOLLOW I N8 DATA 
EXACTLY AS SHOWN, INCLUDING SPAC 
ES*** 

370 DATA 1,2,2 1,2 2,2 3,2 
4,2 5,2 6,2 7,2 8,2 

8 1,2 8 2,2 8 3,2 8 
4,2 G 5,2 8 6,2 8 

7,2 8 8,2 8 8 1,2 8 
8 2,2 8 9 2,2 8 10 



2,2 
375 DATA 2 

2,2 8 
,2 8 18 

8 18 3,2 
18 5,2 8 

7,2 8 18 
1,2 8 18 

9 2 

380 DATA 2 8 
18 12 1,2 



2,2 



8 13 



2,2 
8 



8 



1,2 


8 


18 


2,2 


8 


18 


4,2 


8 


18 


6 


2 8 


18 


8, 


2 


8 18 


8 


8 


2 


2 8 


18 



1,2 8 18 16 1,2 8 18 
18,2 8 18 18 1,2 8 18 
18 2,2 8 18 18 3,2 8 
18 18 4,2 8 18 18 5 
385 DATA 2 8 18 18 6,2 8 
IB 18 7,2 8 18 18 8,2 
8 18 18 8 1,2 8 18 
18 8 2,2 8 18 18 9 2 
,2 8 18 20 8 2,2 8 18 
21 8 2,2 8 18 22 8 
2,2 8 18 23 8 2 
390 DATA 2 8 18 24 8 2,2 

8 18 25 8 2,2 8 18 
25 9 2,2 8 18 27 8 2 
,2 8 18 28 8 2,2 8 18 
29 8 2,2 8 18 30 8 
2,2 8 18 31 8 2,2 8 
18 32 8 2,2 8 18 32 9 
2 

395 DATA 2 8 18 32 10 2,2 

8 18 32 11 2,2 8 18 
32 12 2,2 8 18 32 13 2 
,2 8 18 32 14 2,2 8 18 
32 15 2,2 8 18 32 17 
1,2 8 18 32 18 1,2 8 
18 32 18 2,2 8 18 32 18 
3 

400 DATA 2 8 18 32 18 4,2 
8 18 32 18 5,2 8 IB 




Audio Talk/Tutor Programs! 




LANGUAGE ARTS 

Spelling (16 programs) 

Level 3-4 (16 programs) 

(words in context with 
definitions and syr.onyms) 

Phonics (16 programs) 
English as a 

Second Language (32 programs) 
MATHEMATICS 

Levels 1-6 Numbers (16 programs) 

Basic Algebra (16 programs) 
SCIENCE & TECHNOLOGY 

Physics (16 programs) 



',*? Color, with Pictures and Jext ! 

All of our TRS-80 Color programs have easy to understand proles 
sionai announcer narration, not synthesized, robotic voices. All text 
is displayed in easy to read upper- and lower-case characters. Video 
clearly illustrates key concepts In each frame of the program. 

Only $4.40 per program. ($8.80 for 2, one on each ssde of a half-hour 
cassette) $59.00 for 1 6 programs (8 cassettes) in an album. Send for a 
catalog of over 1000 programs for Atari, TRS-80, Apple, etc. 

For more information, or to order call: 

TOLL FREE 1-800-654-3871 



DORSETT 

Educational Systems, Inc. 

Box 1226. Norman, OK 73070 
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32 18 6,2 8 18 32 18 7 
,2 8 18 32 18 8,2 8 18 

32 18 8 1,2 8 18 32 
18 8 2,2 8 18 32 18 9 

2,2 8 18 32 18 10 2 
405 DATA 2 8 18 32 20 9 
2,2 8 18 32 21 9 2,2 
8 18 32 22 9 2,2 8 18 
32 24 8 2,2 8 18 32 
25 8 2,2 8 18 32 25 9 
2,2 8 18 32 26 9 2,2 
8 18 32 28 8 2 
410 DATA 2 8 18 32 29 8 
2,2 8 18 32 30 8 2,2 
8 18 32 31 8 2,2 8 18 
32 32 8 2,2 8 18 32 
32 9 2,2 8 18 32 32 10 

2,2 8 18 32 32 11 2 
415 DATA +,2. 1,+1 (-1 >,,,,+, 1 . 0,+ 
1,2+, 1.5, +2, ,2.0, +3, ,2. 5, +4, 3-, 3 
.0,+5(-3) ,2-, 3. 5, -2, -,4.0,-1, , , , 
+,0.9, +1,2+, 1.2, +2,3+, 1.5, +3, , 1. 
8, +4, 3-, 2. 1, +5, 2-, 2.5, +6 (-2) ,-,3 
.0,-1, , , 

420 DATA +,0.8, +1,2+, 1 .0,+2,3+, 1 
.3, +3,4+, 1.5, +4,5+, 1.6, +5 (+4) , 3+ 
, 1. 6, +6 (+3) , 2+, 1.5, +7 (+2) , 3+, 1.8 
, +3<+2> , 2+, 1.8, +3 (+2) , 2+, 1 .8, +2, 
2+, 1.9, +2,2+, 1.6, +2,3+, 1.6, +3, 4+ 
, 1.8, +4, 3-, 2.0, +3, 2-, 2. 4, +6 (-2), 
-,2.8,-1, ,+,0.8, +1,2+, 1.0, +2, » 
1.2, +3, ,1.4, +4 

425 DATA , 1.6, +5,, 1.8, +6,, 1.9, +7 
, ,2.2, +3, ,2- 2, +3,2+, 2. 2, +2,+, 1.9 
,+1 ,2+, 1.7, +2,3+, 1.7, +3,4+, 1.8,+ 
4 (+2) ,3+, 1.9, +3, 2-, 2. l,+6(-2) ,-, 
2.5,-1, , , ,+, 0.7,+l,2+,0. 9, +2, , 1. 

1, +3,3+, 1. 1, +3,3+, 1. 1, +3,3+, 1.2, 
+3,3+, 1.1, +3,3+, 1.2, +3 

430 DATA 3+, 1. l,+3,3+, 1. l,+3,3+, 

1.2, +3,3+, 1.1, +3,3+, 1.2, +3,3+, 1. 

2, +3,3+, 1.2, +3,3+, 1.1, +3,3+, 1.2, 
+3, , 1. 3, +4, , 1.5, +5, , 1.7, +6, , 1. 9, 
+7, ,2. 2, , ,2.2, , 4+,2.2,+4(+2) ,3+, 
2. 4, +3,2+, 1.9, +2, +,1.8, +3,2+, 1.8 
,+2,3+, 1.9, +3,2+, 2.0, ,-,2.2,-1, , 
,,+,£. 7, +1 

435 DATA 2+, 0 . 9 , +2 , 3+, 1 . 1 , +3 , 4+» 

1.3, ,5+, 1.5, ,6+, 1.7, ,5+, 1.3,, 4+, 
1.3, ,3 + , 1.3, ,3+, 1.3, ,3+, 1.3, ,3 + , 
1.3, , , 1.3, , , , , , ,,,<,, 

440 REM SET UP STRINGS FOR TITLE 
S 

445 R*="BR3" : Q*-"BR8" : D*="BD8BL4 
":K*="BR10BU8": S*="BR2": I*='»BR16 

450 T*=L»(B0)+R*+L*(101)+R*+L*(1 
1 4 ) +S*+L* ( 1 05) +R«+L* (111) +R«+L* ( 
1 00 > +R«+L« ( 1 05 5 +R«+L* ( 99 ) 
455 TT*=L* (84) +R*+L«(97) +R«+L*(9 



8) +R*+L* ( 108) +R*+L* ( 101 ) 
460 TV*-L*(111)+R*+L*(102)+Q*+L* 
(116) +R*+L* ( 1 04) +R*+L* (101) 
465 TR*=L*(69) +R*+L*( 108) +R*+L*( 
101 ) +S»+R*+L* ( 109) +R*+L* ( 101 ) +R* 
+L* (110) +R*+L* (116) +R*+L* (115) 
470 NG*-L*(78)+R*+L*(111)+R*+L*( 
98) +R*+L* (108) +R*+L* ( 10 1 ) + I *+L* ( 
7 1 ) +R»+L* ( 97 ) +R*+L* (115) +R* +L* ( 1 
01 )+R»+L»(115) 

475 AM*=L*(65)+R*+L*(108)+R»+L»( 
1 07 ) +R«+L* (97) +R*+L* ( 1 08) +R«+L* ( 
105) 

480 MT*=L*(77)+R*+L*(101)+R*+L*( 
116) +R*+L« (97) +R*+L* (108) +R*+L* ( 
115) 

485 AE*=L*(65)+R*+L*( 108)+R*+L*( 
1 07) +R*+L* ( 97 ) +R»+L* ( 1 08 ) +R*+L* ( 
105) +R*+L*( 1 10)+R*+L*( 101)+I*+L* 
(69) +R*+L* (97) +R*+L* ( 1 14) +R*+L* ( 
116)+R*+L*(104) 

490 NM*=L* ( 78) +R*+L* (111) +R*+L* ( 
110)+R* 

495 0M*=L*(79)+R*+L*( 116)+R*+L*< 

1 04 ) +R*+L* (101) +R*+L* (114) 

500 TM*=L*(B4)+R*+L*(114)+R*+L*( 
97) +R»+L* (110) +R*+L* (115) +R*+L* ( 

1 05 ) +R«+L* (116) +R*+L « ( 1 05 ) +R*+L* 
(111)+R*+L*(110) 




DATA -500 

A FULL FEATURE DATA BASE 
•It is menu driven with prompts. 

•500 data lines with up to 
3,000 characters per file. 

•Cassette operated. 

•Runs on 16K TRS-80 color computer. 

•Has many uses household and 
small business. Keep things 
organized. 

Priced at $12.0 0, postage paid. 
Send checX or money order to ; 




KTEFRAC SOFTWARE INC. 
2002 N. MAGNOLIA 
TUCSON, AZ 85712 



Arizona re a. add 7* sales tax. 
TRS-80 Is a traiemarK of zhe 
RADIO SHACK C0KP. 




September 1983 tha RAINBOW 45 



505 LA*-L* (76) +R*+L* (97) +R*+L* ( 1 
10) +R*+L*< 1 16 ) +R*+L* ( 104) +R*+L* ( 
97) +R*+L* ( 1 10) +R*+L* ( 105) +R*+L* ( 
1 00 ) +R*+L* (101) +R*+L* (115) 
510 AC*=L*<65)+R*+L*<99)+R*+L*<1 
16) +R*+L* ( 105) +R*+L* ( 1 10) +R*+L* ( 
105) +R*+L* (100) +R*+L* ( 101 ) +R*+L* 
(115) : RETURN 

515 REM CHECK FOR ELEMENT SYMBOL 

520 I FA*= " J " OR A*- "Q" THEN840 

525 IFA*="D ,, THENX=66ELSEIFA*="U" 

THENX=92ELSE IF A*= " V" THENX*23ELSE 

I FA*- " W " THENX=74ELSE I FA*= » X " THEN 

X=54ELSE535 

530 6OTO820 

535 IFA*O"A"THEN550 

540 60SUB845: IFA*="C"THENX=89ELS 

EIFA*="G"THENX=47ELSEIFA*="L"THE 

NX=13ELSEIFA*="M"THENX=95ELSEIFA 

*="R ,, THENX»18ELSEIFA*="S"THENX=3 

3ELSE IFA*= ■ T " THENX=85ELSE I FA*= " U 

"THENX=79ELSE840 

545 6OTOB20 

550 IFA*<>"E"THEN565 

555 Q0SUB845 : I FA*= " R " THENX=68ELS 

E I FA** " S " THENX=99ELSE I FA*=" U " THE 

NX=63ELSE840 

560 GOTO820 

565 IFA*O"Q"THEN580 



570 G0SUB845: IFA*="A"THENX=31ELS 

E I FA*= " D " THENX =64ELSE IF A*= " E "THE 

NX=32ELSE840 

575 QOTO820 

580 IFA*<> ,, L"THEN595 

585 G0SUB845! I FA*= " A " THENX=57ELS 

E I FA*= " I » THENX=3ELSEI FA*= " R " THEN 

X=103ELSEIFA*="W"THENX=103ELSEIF 

A*= " U " THENX=7 1 ELSE840 

590 GOTO820 

595 IFA*<>"M"THEN610 

600 80SUB845: IFA*= ,, D"THENX««101EL 

SEI FA*-"G" THENX- 12ELSE IFA*- "N "TH 

ENX=25ELSEIFA*="0"THENX=42ELSEB4 

0 

603 GOTO820 

610 IFA*<>"R"THEN625 

615 B0SUB845: IFA*=" A"THENX— 88ELS 

E I FA*= " B " THENX— 37ELSE I FA*= " E" THE 

NX=75ELSEIFA*="H"THENX=45ELSEIFA 

*="N"THENX=86ELSEIFA*=*"LPTHENX=4 

4ELSEI FA*= " F" THEN X = 104ELSE840 

620 GOTO820 

625 IFA*<>"T"THEN640 

630 G0SUBB45 Z IFA*="A " THENX=73ELS 

E I FA*= " B " THENX=65ELSE I FA*= "C " THE 

NX=43ELSEIFA*="E"THENX=52ELSEIFA 

*="H , 'THENX=90ELSEIFA*="I"THENX=2 

2ELSEIFA*="L"THENX=81ELSEIFA*="M 




112 W. WISCONSIN AV. 
KAUKAUNA, Wl 54130 
(414) 766-1 851 
STOCK ITEMS SHIPPED SAME DAY! 



THE COSMOS 
CONNECTION IS 
A COMPLETE SERIAL 
TO PARALLEL INTERFACE 
FOR THE COLOR COMPUTER 
THE GEMINI - ifandis 
PRINTERS. 



. NO AC REQUIRED 
. SWITCHABLE 
BAUD RATE 



HIGH QUALITV 
CONSTRUCTION 
COMPACT 
90 DAY 
WARRANTY 




THE COMPLETE TBS-80® LINE 

. COLOR COMPUTER 
. MODEL 100 

* MODEL 4 
> MODEL 16 
. MODEL 12 

• ACCESSORIES 



GEMINI— 1 OX 
PRINTER 
AND 
THE 
COSMOS 
CONNECTION, 
IT'S A 
WINNING 
PRINTING 
COMBINATION. 



S CALL FOR THE BEST DISCOUNT PRICE 
ON TRS-80* FULLY WARRANTEED 
MICROCOMPUTER EQUIPMENT. 

■plus $10.00 Snipping and Han 
TRS-dt <S A TRADEMARK OK TANDY COUP. PNlCSS AND SPEC FICA-iONS SI 



PACKAGE 
READY TO PLUG IN 
TO YOUR COLOR COMPUTER 
ONLY * ^4^>^4!>^ 

4 $369 00 % 

J% GEMINI 10X " 
H PACKAGE 
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"THENX=69ELSE840 

635 GOTO820 

640 IFA*<>"Z"THEN655 

645 G0SUB845: IFA$="N"THENX=30ELS 

E I FA*="R"THENX=40ELSEB40 

650 GOTO820 

655 IFA«O"B"THEN670 

660 G0SUB845: IFA*» "B"THENX-5ELSE 

I FA$- " A " THENX =56ELSE IFA$="E" THEN 

X«=4ELSEIFA*=" I "THENX=83ELSEIFA*= 

"K"THENX=97ELSEIFA*«"R"THENX=35E 

LSE840 

665 GOTO820 

670 IFA*<>"C"THEN685 

675 G0SUB845: IFA*="C"THENX=6ELSE 

I FA$- " A " THENX=20ELSE IF A$= " D " THEN 

X=4BELSEIFA$="E"THENX=58ELSEIFA« 

="F"THENX=98ELSEIFA$-"L"THENX=17 

ELSEIFA$="M"THENX=96ELSEIFA*="0" 

THENX=27ELSE I FA*= " R " THENX-24ELSE 

I FA*= " S " THENX=55ELSE I FA*= " U " THEN 

X=29ELSE840 

680 GQTO820 

685 IFA$O"F ,, THEN700 

690 G0SUB845: I FA$= " F " THENX=9ELSE 

IFA*=" E " THENX=26ELSE I FA*="M" THEN 

X = 1 00ELSE I FA*=" R " THENX=87ELSE840 

695 GOTOB20 

700 IFA«>"H"THEN715 

705 G0SUB845 : I F A*~ " H " THEN X = 1 ELSE 



IFA*»"E"THENX=2ELSEIFA*="F"THENX 

=72ELSEIFA*="G"THENX=80ELSEIFA*= 

"O"THENX=67ELSEIFA$="A"THENX=105 

ELSE840 

710 GOTQ820 

715 IFA$O , 'I , 'THEN730 

720 G0SUB845 i I FA$= " I "THENX=53ELS 

E I F A*= " N " THENX -49ELSE I FA* = " R " T HE 

NX-77ELSE840 

725 GOTQ820 

730 IFA$0"K ,, THEN745 

735 G0SUBB45: IFA*="K"THENX=19ELS 

EIFA*="R"THENX=36ELSEB40 

740 GOTO820 

745 IFA$<>"N"THEN760 

750 G0SUB845: IFA*="N"THENX»7ELSE 

I FA*= " A " THENX= i 1 ELSE I FA»= " B " THEN 

X =4 1 ELSE I F A* = " D " THENX-60ELSE I FA$ 

="E"THENX=10ELSEIFA*="I"THENX=28 

ELSE I FA*- " O " THEN X = 1 02ELSE I FA$= " P 

"THENX=93ELSE840 

755 GOTQ820 

760 IFA$O"0 ,, THEN775 

765 G0SUB845: IFA*="0"THENX=8ELSE 

IFA*="S"THENX=76ELSE840 

770 GOTQ820 

775 IFA*O"P"THEN790 

780 G0SUB845: IFA$="P"THENX=15ELS 

EIFA*="A"THENX=91ELSEIFA*="B" THE 

NX=82ELSEIFA$="D"THENX=46ELSEIFA 



6809 



RECORD MANAGEMENT SYSTEM 



RMS 



DATABASE MANAGEMENT 

RUNS ON THE COLOR WITH FRANK HOGG FLEX 



•user defined rec»rd format via data dictionary 
•screen »riented, form fill out type of access 

• optional two level record hierarchy 

• all files in ascii text format, basic compatible 
•direct access by key field, multiple index files 
•extensive documentation. sample application 
•versatile, professional quality report writer 
•built-in sort/merge 

• easy to use 




RMS is a complete DATABASE MANAGEMENT package 
tor the 6809 computer It is made up of five machine 
language programs that make up the most powerful 
business programming too; available for the 6809. It can Ire 
used by the relative novice, to implement an incredible 
variety of information storage and retrievai applications, 
without any programming. However, the programmer can 
use RMS as part of the solution to a larger problem, sawing 
many hours of unnecessary pfogram development time. 
RMS can be used to handle data input, editing, validation, 
on-line retrieval, sorting and printed reports. Custom data 
manipulation can oe filled in by the user's BASIC programs. 



SINGLE CPU LICENSE 
FLEX* $200 
OS-9+ 4250 
UNIFLEX* *300 

TSBMS VISA /MC/PIW AID 



WASHINGTON 
COMPUTER SERVICES 

3028 SILVERN LANE 
BELLlNGHAM, WA 98225 
1 12061 734-6246 
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*="M"THENX=61ELSEIFA*="0"THENX=8 
4ELSEIFA*="R"THENX=59ELSEIFA*="T 
"THENX=78ELSEIFA*="U"THENXss94ELS 
E840 

785 GOTO820 
790 I F A*< >"S" THEN805 
795 G0SUB845: IFA*="S"THENX=16ELS 
EIFA*="B"THENX=51ELSEIFA*="C"THE 
NX=21ELSEIFA*="E"THENX-34ELSEIFA 
*=" I "THENX=1 4ELSEI FA*= H M" THENX-6 
2ELSEIFA**"N"THENX-50ELSEIFA*«"R 
" THENX-38ELSE840 
800 GOTO820 
805 IFA*O"Y"THEN840 
810 Q0SUB845: IFA*="Y"THENX=39ELS 
E I FA*= " B " THENX =70ELSE840 
815 REM PRINT ELEMENT DATA 
820 CLS:PRINT@42,NS*(X>:PRINT@64 
'.STRING* (32, "=" > :PRINT@104, "ATPM 
IC NO. : *" ; X; "*":PRINT@161, "ATOM 
. WT. : " f AW* ( X ) : PR I NT@1 79, " s. G . : " ; 
SG* ( X > : PR I NT8225, " I ON CHARGE : C " ; 
IC*(X> ; "3":PRINT@242, "ELEC.NEG. J 
";EN*(X> :PRINT@295, "OXYDATION NO 

. : " ; 00* ( x > 

825 PRINTS353, "NO. OF ELECTRONS 
IN EACH SHELL": PR I NT@387, STRING* 
( 25, "-" ) I PRI NTS419 , "K L M 
NOP Q":PRINT@451,ES*U> 
830 A*= INKEY*: IFA*=" "THEN830ELSE 
IFA*=" "THENS35ELSE520 
835 SCREEN1,0:ONZ GOTO105, 1 15, 12 
5, 135, 145, 155, 165, 175, 185 
840 CLS0: PR INT6234, "ENTRY ERROR" 
5 : FORT=1TO400 : NEXTT: SCREEN 1 , 0 : ON 
2 GOTO105, 115, 125, 135, 145, 155, 16 
5,175,185 

845 A*-INKEY*: I FA*=" " THEN845ELSE 
RETURN 

830 CLS: PRINT" THE FIRST SCREE 
N SHOWS THE COMPLETE PERIODIC 

TABLE. TO SEE THE EIGHT SEP 
ARATE CLASSES OF ELEMENTS, SIMP 
LY PRESS THE spacebar EACH 

TIME. " 

855 PRINT: PRINT" WHEN VIEWING an 
y SCREEN, YOU MAY RETRIEVE IN 



* enlries per day 



. V, Ml 3'. ! v. comparisons. fo-,-»34!ng jra (n.re J 

MUTUAL FUNDS i»v«si i^na-m* way sa.c - 
start, ga UrospEciuj and n»te into on the lunds $4 

DATA MANIA, INC. 

Sallware •«(« 
Add 41 50p,-n 51SZ5 CMe5inuin«ad 

Granger, IN 4«53» 



FORMATION ON any ELEMENT SIM 

PLY BY TYPING THE ELEMENT'S S 
YMBOL. ":PRINT 

860 PRINT" N.B.: WITH SINGLE-LET 
TER ELEMENTS, YOU MAY HAV 

E TO TYPE THE same LETTER TWICE 

. ": pr i nt: pr i nt" press any key t 
d continue"; 

865 a*-inkey*: ifa*-" "then865 
870 cls:print:print" for example 
, to view the data on hydrogen 
, type <hh>. this is only nec 
essary when other elements sh 

ARE THE SAME FIRST LETTER. IN 
OTHER CASES, A SINGLE LETT 

ER WILL SUFFICE." 

875 PRINT" FOR EXAMPLE, TO SEE T 
HE DATA ON URANIUM, SIMPLY TY 
PE <U> AS NO OTHER ELEMENT STAR 
TS WITH THAT LETTER. FOR THE 
SAME REASON, SOME 2-LETTER 

ELEMENTS WILL REQUIRE THAT ONL 
Y THE FIRST LETTER BE TYPED 

IN. " 

880 PRINT: PRINT" PRESS ANY KEY 
TO CONTINUE"; 

885 A*= I NKEY* : I FA*«" " THEN885 
890 CLS:PRINT: PRINT" THIS APPLIE 
S TO ELEMENTS dy AND x« AS NO OT 
HER ELEMENT SHARES THEIR FIRST 

LETTERS. ":PRINT 
895 PRINT" WHEN VIEWING DATA ON 
AN ELEMENT YOU MAY RETURN TO THE 
TABLE BY PRESSING THE spacebar 
OR YOU MAY ENTER ANOTHER SYM 
BOL. ": PRINT 

900 PRINT" NOTE: A NUMBER IN PAR 
ENTHESES (ATOMIC WEIGHT) INDIC 
ATES THE MASS NUMBER OF THE MO 
ST STABLE ISOTOPE." 
905 PR|NT@484, "PRESS ANY KEY TO 
CONTINUE "; 

910 A*= I NKEY* : I FA*= " '* THEN91 0 
915 CLS:PRINT@41, "ABBREVIATIONS" 
:PRINT@73, STRING* (13, "-" > : PRINTS 
98, "ATOM.WT.= ATOMIC WEIGHT": PR I 
NT@162, "S.G.= SPECIFIC GRAVITY": 
PRINTS226, "ELEC. NEG. = ELECTRONEG 
ATIVITY" 

920 PRINT: PR I NT" N. B.: VALUES 
GIVEN FOR 'ION CHARGE' AND ' 

OXYDATION NO.' FOR CERTAIN E 

LEMENTS ARE THOSE REPRESE 

NTING THE MOST COMMON OR STA 

BLE STATE (S) . " 

925 PRINT@484, "PRESS ANY KEY TO 
START" ; 

930 A*= I NKEY* : I FA*= " " THEN930ELSE 

=! 
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EDUCATION NOTES. 



16K 

ECB 



Tfc JT any of you readers as well as some of my teaching 
|\/| colleagues have asked what one teacher can do to 
It A help introducecomputers to his local school. 1 will 
share in this month's article some of my own personal expe- 
riences in the hope that you will be getting some additional 
ideas and be inspired to use your resources to helpspread the 
computer revolution. 

The junior high school that 1 teach in is located in the 
famous Flatbush area of Brooklyn, New York. This is the 
neighborhood that the mo vie "Sophie's Choice" was filmed 
in. Although built to accommodate 1,200 students, the 
building now houses over 1,700. The students are of diverse 
ethnic backgrounds: Over 70 percent of the students are 
minority students. The neighborhood still retainsits famous 
middle-class character, 

This story starts in January, 1982, My junior high school 
was still in the Computer Dark Ages. Not only were there no 
computers in the school yet, but there were no plans to 
acquire any. None of the math teachers owned or planned to 
own home computers. I was the only one interested in this 
field, but 1 am a Special Education teacher. What, you ask, 
could one person do alone? 

I am, however, in a unique position in the school. 1 have 
been teaching Special Education here for 13 years, am 
friendly witb many of the 100-plus teachers, and have the 
full cooperation and mutual respect of all of the administra- 
tors. I am therefore able to try innovative ideas and intro- 
duce new projects with no difficulty. Although my license 
would not permit me to teach computer literacy full time in 
the school, 1 felt that 1 could influence the actions of others. 

It has long been obvious to me that a mathematical equa- 
tion exists between the amount of experience a teacher or 
administrator has and his degree of resistance to change. 
This is not meant to castaspersions on these professionals, 1 
am part of t hem and know that it is merely the result of their 

(Steve Blyn teaches both exceptional and gifted child- 
ren, holds two master's degrees and has wmn awards 
for the design of programs to aid the handicapped. He 
and his wife, Cheryl, own Computer Island.) 



being witness to many"unique cure-alls" over the years that 
often amounted to a waste of time only to be replaced by 
another magic "cure-all." 

1 realized that it would be necessary to enlist the aid of 
many of the other experienced professionals on the staff to 
introduce some sort of computer program to the school. 
Direct didactic methods would not stand a chance either by 
me or the administrators, 1 was certain that computers could 
not be forced upon this professional staff. Another, more 
humanistic approach would have to be taken. 

An open door policy would have to be established by 
myself, wiih the principal's consent, to create an awareness 
of a computer's potential as a teaching aid in our school, 

I decided to start out slowly: Let's not overwhelm or scare 
anyone off early in the game. 1 requested permission of the 
principal to bring my TRS-8Q Color Computer to school on 
a once a week basis. I used some of the educational software 
that I have developed at home as learning material for my 
students. Computer programs or software that help to rein- 
force teaching are known as Computer Assisted Instruction 
(C.A.I.). 

My clas.s is the Special Education Resource Room at this 
school. 1 teach small groups of learning disabled students. 
The students immediately saw the computer to be a novel 
way of learning new and reviewing old material. They enjoy 
using the C.A.I, materials and several have even begun to 
read and write very simple programs. They, of course, love 
to read each new issue of the Rainbow. 

Each of the assistant principals, the principal, tbe special 
education super? isor of the district, the school's guidance 
counselors, and the P.T.A. presidentwere invited separately 
to view these lessons. Teachers were invited to drop in at 
their convenience any time on any Friday. Friday soon 
became known as Computer Day in my Resource Ro»m 
and to a number of the staff in the school. 

Two of the school's math teachers took an immediate 
liking to the computer. They came to visit every Friday and 
quickly grasped the possibilities for its use with math classes, 
By coincidence, the school was given some money by the 
district in March, This money had to be spent immediately 



SO «w RAINBOW SeptembBf 1983 



by the math department. They decided to use the money to 
buy computer equipment. 

Unfortunately, I could not in good conscience recom- 
mend to them the purchase of CoCos at that time. There was 
a scarcity of educational software on the market, no Net- 
work, and a new and unproven disk drive. I therefore sug- 
gested that they use their money to begin with four TRS-80 
Model III computers, one disk drive and a printer. There 
was much software available for the Model Mis then. 

The equipment was ordered and arnvtd quickly. There 
was, however, no way that the math department could begin 
a program with the computers and students in the middle of 
a term. Ii was decided that the two math teachers who were 
interested in computers and the principal would take these 
computers home until September to practice and team more 
about them. The fourth computer with the disk drive and 
printer would be placed in my Resource Room for the rest of 
the term. 

This represented a big opportunity for mc to involve more 
people in computers. I thanked the school fur lending my 
class the computer and volunteered to teach a group of 
students from the school's math team 
about computers. 

These students were the very bright- 
est math students in our school. We met 
each day during my preparation period 
and their lunch period. They quickly 
learned how to operate the computer, 
disk drive and printer and how to save 
and load in programs. This is referred to 
as computer literacy. I also began to 
teach this group simple programming 
commands and routines. This was an 
introduction for them into real pro- 
gramming. They soon picked up enough 
elementary programming ability and 
the skills to begin to write simple pio- 
grams on their own as a group. 

I also volunteered to write some pro- 
grams which would generate class lists 
for the school. This would be a large 
lime saver for many people as it is very 
difficult to keep track of all the kids in the school. The 
computer could easily print lists of children by official class, 
subject class, minor groups, shops and many other ways. 
Just about everyone volunteered to type in the data in order 
to gain experience with the "new toy." This acted as the 
school's introduction to data processing programs. 






This data program actually served to win over more advo- 
cates for computers than all of my teaching efforts, The 
assistant principals, deans, counselors, attendance teacher 
and several other people with administrative jobs quickly 
saw the advantage of such lists to make their jobs easier. 
After all of the pupils' names were entered into the program, 
lists were generated on the printer ano 
given to anyone who needed them. 
Many teachers used these lists to help 
them enter iheir final grades. 

By the opening of the fall term in 
Scpicmbcr. 1982. the P.T.A. had al- 
ready decided to contribute the money 
for four more Model 1 1 1 computers and 
a Network. This meant that there were 
nuw eight computers available 1 or a sin- 
gle classroom. The Network allows ihe 
teacher to upload and download pro- 
grams from the disk computer to the 
other seven computers. This equipment 
was clearly enough to really begin a 
computer literacy course for entire 
classes. One of the math teachers who 
had borrowed a computer over the 
summer became the teacher of this 
class. I willingly helped out with some 
demonstration lessons. Since Septem- 
ber, five classes a day have been successfully receiving com- 
puter literacy and programming instruction. 

Just before the summer, our Gales program received a 
sum of $2,000 lo spend on instructional materials. The Gales 
program has remedial classes for children who arc below 
grade level in reading or math. The assistant principal in 
charge of this program decided lo spend lhat money on 
computers. More software and peripherals had been put on 
the market by then and I recommended that they purchase 
three TRS-80 Color Computers, three black and white mon- 
itors and one printer. I recommended TRS-80 Color Com- 
puters for them because ol the inexpensive price, and the 
musical and graphic capabilities of this computer. Also, I 
had developed much educational software which I would 
donate to their program. The computers arrived just before 
summer vacation. They were also taken home over the 
summer by several teachers to practice and get a head start 
on learning the possibilities ot their new machines. 

In the tall, (he Gates program began lo use iheir compu- 
ters. They concentrated mainly on C.A.I, reading programs 
and word processing. The reading programs were modif ica- 
tions of the ones that I was using in the Resource Room. 
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They were also very interested in using the word processor 
and printer as a means of putting out better class magazines, 
Sinee the students are obtaining much more professional 
looking results, their stories and articles are becoming both 
longer and better. 

Since the Gates classes were not using their computers on 
a regular basis, they were kind enough to let one reside in my 
room. This, of course, again saved me the trouble of bring- 
iug in my own computer. The assistant principal of this 
program was so impressed with the Color Computer that he 
bought one for his own personal use at home. 

All proceeded on this course until March. The school 
received some unexpected funds and the principal decided 
to let the Resource Room hgve its own computer. ATRS-80 
64K Color Computer and disk drive were purchased. My 
mother always says, "when it rains, it pours." As an added 
bonus to my elass's program, one of the original math 
teachers was kind enough to donate a used color television 
to my class for use as a monitor. After demonstrating and 
using my Color Computer in school f or over one year with a 
black and white television, I could finally utilitize the color 
Capabilities. Color, of course, adcjsa pleasant extra motiva- 
tional factor to all of the programs. 

The school's principal and the program office chairman 
were both very impressed throughout this entire period by 
the data processing abilities of computers. The program 
office is the place that figures out teacher, class, room, 
lunchtime, shop and many other teacher and student sche- 
dules. They asked many questions about the possibilities of 
a computer becoming an aid to programming and printing 
many of the repetitive and administrative tasks in the 
school. The principal told the local school board of his 
desire to purchase a computer to help alleviate and quicken 
much of the office work. 

The sch««l board was so impressed with this idea that 
they appropriated enough money to purchase a very sophis- 
ticated computer system. An IBM computer with mne hard 
and two floppy disk drives and a printer have recently been 
ordered for administrative purposes. Several special soft- 
ware packages to do advanced word processing and to 
ereate data bases have also been ordered. We expect to have 
this equipment up and running by September, 1983. 

I feel that the method of approaching the original prob- 
lem was correct. If I, or anyone else, had tried to force the 
introduction *f computers into our school in a dogmatic or 
t hreatening f ashion, there would have been much resistance. 
The "lets do it together" approach that 1 took and the 
willingness of the principal to let many faculty members 
borrow the equipment over the summer vacation were both 
very important and successful ideas. 

We now have successful computer programs on several 
levels. Our school is no longer computer illiterate. I feel 
much personal satisfaction in the part I played and continue 
to play in this situation. 

I have included three short programs written by several 
members of the eighth grade math team. We had been 
working together for almost a year and decided to have a 
contest to create a logo f or their team. Although very bright, 
these students are not too advanced in the use of high 
resolution graphics because of their limited access time to 
the computer. 1 taught them the uses of the line command 
and let them use their abilities to create the programs that 
follow. The results are especially pleasing to me as none of 
these kids have a home computer of their own on which to 
practice. 
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10 REM"TQRI 11 

20 PCLS: SCREEN 1,1: PMODE 4,1 

30 COLOR 7 

40 FOR Y= t TO 8 

50 LlNE(4+T,4+T>~(253-T, 188-T) ,P 

SET, B 

60 T= T+4 

70 NEXT Y 

80 LINE (60,52) -< 64,64 ), PSET, BF 
90 LINE (56 ,56) - (68, 60) , F9ET, BF 



100 


LINE(56,94) - ( 68 , 98 > , PSET . BF 


1 10 

F 


LINE (60, 128) - 


(64, 140) , PSET, B 


120 


LINE (56,132) 


-(68, 136) ,PSET 


, BF 

130 


LINE ( 192,52) - 


( 196, 64), PSET, B 


F 

140 


LINE (188,56) 


-(200,60) , PSET, 


BF 






150 


LINE (188,94) 


- (200,98) ,PSET, 


BF 






160 


L.INE( 192, 128) 


-(196, 140) , PSET 


, BF 






170 


LINE (188, 132) 


-(200, 136) .PSET 


, BF 






180 
F 


LINE (120,48)- 


( 124,68) ,PSET,B 
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190 

BF 

200 

210 

220 

230 

240 

250 

260 

F 

270 
F 



290 

BF 

300 

310 

320 

330 

340 

BF 

350 

,BF 

360 

, BF 

370 

, BF 

380 

, BF 

390 

400 

410 

BF 

420 

F 

430 
F 

440 
, BF 
450 
F 

460 

BF 

470 

BF 

480 

F 

490 

5£>0 

510 

520 

530 

BF 

540 

BF 

550 

560 

570 

580 



LINE (132,48>-(136,6S> ,PSET, 

LINE (124, 48)- (128,56) , PSET 
LINE (124,60 >-( 124,64) , PSET 
LINE <1 28, 56)-( 132,48) , PSET 
LINE (128,64)-(132,60),PSET 
L I NE ( 1 24 , 60 ) - ( 1 28 , 64 ) , PSET 
PAINT (128, 60), 7, 7 
LINE. (120, 76) -( 124,92) , PSET, B 

LINE(132,76)-<136,92) , PSET , B 

LINE (124,80) -(132, 84 ), PSET, B 

LINE (124,72) -(132, 76) , PSET , 

LINE (120,76)-(124,72) , PSET 
LINE (124, 78) -(126,76) , PSET 
LINE ( 130, 76) - ( 132, 78) , PSET 
LINE (132, 72) -(136,76) , PSET 
LINE (120,96) -(136, 100) ,PSET, 

LINE (126, 100) -(130,1 16) , PSET 

LINE ( 120, 120) - (124, 140) , PSET 

LINE (120, 128) -(136, 132) , PSET 

LINE ( 132, 120) — ( 1 36, 140) , PSET 

LINE (80, 86) -(96,90), PSET, BF 
LINE (86,86) - (90, 106) ,PSET,BF 
LINE(100,86>-(104, 106) ,PSET, 

LINE (100,86) -(11 6, 90) , PSET,B 

LINE- (100, 94) — ( 1 1 2 1 98) , PSET, B 

LINE (100, 102)- (116, r06> ,PSET 

LINE(144,86)-(150» 90) ,PSET,B 

LINE (152, 88) -(156, 106), PSET, 

L I NE (140, 88 ) — ( 1 4 4 . 106) , PSET „ 

LINE(140,94)-(156,98) ,PSET,B 

LINE (152,86)-(156,88) , PSET 
LINE ( 140, 88) - ( 144, 86) , PSET 
L I NE( 144, 92) -(146,90) , PSET 
L1NE(150,90)-(1S2,92) ,PSET 
LINE (160, 86 )-( 164, 106) ,PSET, 

LINE(172,86)-(176, 106) ,PSET, 

LINE (164, 86)- (168, 92) , PSET 
LINE (168, 92) -(172, 86) , PSET 
LINE(164,98)-(168, 102) , PSET 
LINE (168 ,102) -(172, 98) , PSET 




590 PAINT (167, 95) ,7,7 
600 LINE (122, 74) -(134, 74) , PSET 
610 LINEU22,75>-(134,75),PSET 
620 LINE (142, 87) -(152, 87), PSET 
630 LINE(144,86)-(152,86) , PSET 
640 LINE(144,88>-(152,88) .P8ETIL 
I NE ( 1 44 , 89 ) - ( 1 52 , 89 ) , PSET : L I NE ( 1 
44,90)-(152,90) ,PSET 
650 OOTO650 



Listing 2; 



10 REM" BOB" 
20 PCLS: SCREEN 1,1: PM0DE4 , 1 
30 COLOR 7 

40 LINE(24, 16)-(24,56) ,PSET:LINE 
-(36,56) , PSET 

50 LINE(36,56>~(36,36> ,PSET:LINE 
-(48, 48) , PSET:LINE-(60,36) , PSET 
60 L INE ( 60, 36) - ( 60 , 56) , PSET : L I NE 
-(72,56) ,PSET:LINE-(72, 16) , PSET: 
LINE-(60, 16) , PSET 

70 L I NE ( 60 , 1 6 ) - ( 4 8 , 28 ) , PSET : L I NE 
-<36, 16) , PSET: LINE- (24, 16) , PSET 
80 PAINT(64,28) ,3,7 
90 LINE(80,24)-(80,56) ,PSET:LINE 
-(92,56) ,PSET:LINE-(92,44) , PSET 
100 LINE (92, 44 )-( 104,44) , PSET: LI 
NE-(104,56> ,PSET:LINE-(1 16,56) ,P 
SET 

110 LINE(116,56)-(116,24) ,PSET:L 
INE- (104, 16),PSET:LINE-(92, 16) , P 
SET:LINE-(80,25) ,PSET 
120 LINE(92,36>-(104»36),PSET:LI 
NE- ( 1 04, 32 ) , PSET : L I NE- ( 99 , 27 ) , PS 
ET : LINE- (92, 32) , PSET: LINE- (92, 36 
> ,PSET 

130 PAINT (93, 37) ,3,7 

140 DRAW "BM124. 1 6 ; R39; D13; L 13; D 

295 L13 ; U29 ;L13;LJ13" 

150 PAINT( 130,20) , 3, 7 

160 DRAW'BM 168, 16 ? R13; D 17? Rl 7; Ul 

7;R13;D4!;L 135L)17«L175D17;L13i 

U41" 

170 PAINT (176,28) ,3,7 

1 80 DRAW " BM28 , 72; R39 ? D 1 3 » L 1 3 5 D29 

;L13iU29jL13jUl3 H 

190 PAINT (48, 80), 3, 7 

200 DRAW " BM72, 80J R30 s D 1 3 ; L 1 3 ; D5; 

R9; D9;L9jD5;R13;D13;L295U45" 

210 PAINT (84, 90), 3, 7 

220 DRAW" BM108, 1 00 i D30 »R12jLll7;R 

16;D17»R32;U30" 

230 LINE (148, 1 00) - ( 1 36, 88 ) , PSET: 
LINE- (120,88) , PSET: LINE- (108, 100 

) ,P5ET 

240 DRAWBM120, 100il5lR16|U5" 
250 LINE < 136, 100) - ( 1 32 , 96 ) , PSET; 



54 me RAINBOW September 1983 



LI NE- < 124 , 96) , PSET : L INE- ( 120, \00 
) ,PSET 

260 PAINT (128,92) .3,7 

270 DRAW"BM16B,96;L12;D41iR125U2 

2B0 L INE ( 168, 1 16 ) - ( 180, 1 28 ) , PSET 
: LINE- (192, 116), PSET 
290 LINE(16B,96)-(1B0, 10B),PSET: 
LINE— ( 1 92, 96) , PSET 

300 DRAWBM 1 92 , 96 ; R 1 2 ; D4 1 ; L 1 2; U2 

1" 

310 PAINT ( 196, 116) ,3,7 

320 L INE (2B, 120 ) - (28, 160) , PSET: L 

INE-(204, 160) ,PSET:LINE-(2B, 120) 

,PSET 

330 PAINT(56, 144) ,3, 7 

340 LINE(5,5)-(250,1B6),PSET,B 

350 LINE(10, 10)-(245, 1B1) ,PSET,B 

360 PAINT (7, 7), 3, 7 

370 F»R T= 1 TO 4:CIRCLE(232,36) 

,y;Y*y+4:next 

3B0 G«T« 3B0 




Listing 3: 

10 REM "J&E" 
20 PCLS: SCREEN 1,1:PM1DE 4,1 

30 CLS 

40 LINE (64, 44) -(72, 52) .PSET, BF 
50 L I NE ( 88 ,443 - < 96 , 52 ) , PSET , BP 
60 LINE ( 104, 44) - (134,52) , PSET,BF 
70 LINE ( 144, 44 ) - ( 176,52) ,PSET, BF 
80 LINE (184, 44 ) - ( 192,52) , PSET, BF 
90 LINE (208, 44) - (216,52) , PSET, BF 
100 LINF.(64,60) • (96, 6B) , PSET , BF 
110 LINE (104, 60) - (136,68) , PSET, 8 
F 

120 LINE ( 156,60) -( 164, &8) , PSET, B 
F 

130 LINE (184, 60? -(216, 68) , PSET , B 
F 

140 LINE (64, 76)-(72 s 84 ), PSET, BF 
150 LINE(BB,76)- (96,B4) ,PSET,BF 
160 L I NE (1 04 , 76 ) - ( 1 1 2 , 84 ) , PSET , B 
F 

170 LINE(128,76)-(136,84),PSET,B 
F 

180 L I NE ( 1 56, 76 ) — ( 164 , 84 ) , PSET , B 
F 

190 L INE ( 184, 76) — ( 192 ,84 ) r PSET, B 
F 

200 LINE(208,76>-<216,84> ,PSET,B 
F 

210 LINE (64, 52>-<72,60) ,PSET, B 
220 LINE(BB,52)-(96,60),PSET,B 
230 LINE ( 104,52>-< 112,6(3) , PSET, 
B 

240 LINE ( 128, 52) -( 136,60) ,PSET, B 
250 LINE(156,52)- (164,60) ,PSET,B 
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260 LINE (184,52) -(192, 60), PSET, B 
270 LINE(208,52)-(216,60) ,PSET,B 
2B0 L INE (64, 68) - (72, 76) , PSET, B 
290 LINE(88,68>-(96,76 ) , PSE 

T,B 

300 LINE (104,6B)-(U2,76) ,PSET, 
B 

310 LINE(12B,6B)-(136,76) , PSET , B 
320 LINE(156,6B)-(164,76),PSET,B 
330 LINE(1B4,6B)- ( 192,76) , PSET , B 
340 LINE(20B,6B)-(216,76) ,PSET,B 
350 LINE(72,44)-(B0,60) ,PSET!LIN 
E -(88,44) ,PSET 

360 LINE(40, 100)-(72, 10B) ,PSET,B 
F 

370 LINE(B0, 100)-(112, 108) , PSET , 
BF 

380 LINE (120, 100)-(152, 10B),PSE 
T, BF 

390 LINE(160,100>-(16B,10B>,PSET 
, BF 

400 LINE(1B4,100)-(192,108>,PSET 

f BF 

410 LINE (52,1 16) -(60, 1 24), PSET, B 
F 

420 LINE(B0, 1 16)- (10B, 124) ,PSET, 
BF 

430 LINE(120,116)-(152,124),P9ET 
, BF 

440 L I NE ( 1 60 f 1 1 6 ) - ( 1 92 , 1 24 ) , PSET 

, BF 

450 LINE (52, 132)^(60, 140) ,PSET,B 
F 

460 LINE(B0, 132)-(U2. 140) , PSET, 
BF 

470 LINE(120, 132)-(12B, 140) , PSET 
, BF 

4B0 LINE ( 144, 132)- U52, 140) , PSET 
, BF 

490 LINE (160, 132)- ( 16B. 140) , PSET 
, BF 

500 LINE ( 184, 132)- ( 192, 140) , PSET 
,BF 

510 LINE (52, 1 08)- (60, 114) ,P'SET,B 
520 LINE (B0, 10B)-(BB, 116), PSET, P 
530 L I NE ( 1 20 , 1 08 > -M 1 28 ,116), PSET 
,B;LINE( 144, 10B) - ( 152, 1 16) ,PSET, 
B: L. I NE ( 160, 10B) -(168, i 16) ,PSET,B 
: L INE ( 184, 108) (192, 116) , PSET, B 
540 I INE(52, 124)-(60, 132) , PSET, B 
: LINE (80, 124 )- (88, 132) , PSET, B: LI 
NEU20, 124) -(128, 132) ,PSET,B:LIN 
E (144, 124) -(152, 132), PSET,B: LINE 
(160, 124)- ( 168, 132) , PSET, B:L INE ( 
1B4, 124) -( 192, 132) , PSET , B 
550 L I NE (168, 100) -(176, 1 16) ,PSE1 
:LINE-( 1B4, 100) ,PSET 
560 LINE (4,4)-(252, IBB) , PSET,B 
570 GOTO 570 
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Boggle Clone 
Demands Concentration 



By Stephen Lai 




After playing several rounds of Boggle, a popular 
word game made by Parker Brothers, with my 
friends and family, I decided to write a program 
patterned after it. In the proeess I learned much about 
arrays, bubble sorting and randomizing. 

Each player will need a pencil and paper to play this game. 
Three minutes are given for one to eight players to find as 
many hidden words as possible in a 4 x 4 layout of randomly 
selected letters. Words are formed by linking horizontally, 
vertically, and diagonally adjacent letters together. No sin- 
gle letter may be used more than once, but if two identical 
letters are both located in the layou t, both may be used. Any 
word that can bef ound in a standard English dictionary may 
be used, with the exception of proper nouns and words of 
less than three letters. 

More thorough instructions are provided in the program. 
Instead of using DRA W statements to produce the 26 
letters of the alphabet on the graphics screen, I used data 
which is POKEd into the appropriate memory locations on 
the screen. I picked the black green mode over the black/- 
buff mode to make the undocumented colors more incon- 
spicuous. 

Here is a detailed description of the program, line by line: 
LINES DESCRIPTION 

10: Sets up arrays for graphic representation of the 
26 letters of the alphabet (AZ), the 16 six-lettered 
cubes (CBS) and the 16 cells in which the cubes 
will be randomly placed. 

(Stephen iMi is a high school freshman in Palatine, 
Illinois. His primary interests are the color computer, 
jogging, tennis, and carnivorous plants.) 



30—40: 
50—70: 



90: 

100—110: 



200—210: 
220-230: 



Sets graphic screen to highest resolution; clears 
the screen black; skips over lines 30 — 80 to get to 
line 90. 

Subroutine that waits for the user to depress the 

"ENTER" key. 

DATA for the AZ array. 

DATA for the CBS array. 

READs the data from lines 50—80. 

Sets up DRAW statements for "I MINUTE." 

"30 SECONDS." "10 SECONDS." and "ADD 

UP POINTS." 

Introduction: asks five questions important to 

game play. 

Initial screen set up. 

Randomly places the 16 cubes into the 4 x 4 
layout (I used the method discussed by Steve 
Blyn in the February 1983 issue of the Rainbow, 
pages 14—16); displays graphics screen, initiates 
the three minute timer. 

Timer runs; subroutines appropriately executed 
to display and erase signals thai warn players 
that one minute, 30 seconds, and 10 seconds arc 
left for finding words. 

Buzz.cr SOU N Ds to signal that the three minute 
time limit has expired; players are told to ADD 
UP POINTS; the computer waits for the "EN- 
TER" key to be pressed. 

Asks each player the amount of points earned in 
the round; adds this to the total from all previous 
rounds; the computer checks to sec if anyone has 
equalled or surpassed the specified score or if the 
specified number of rounds has been played, 
depending on the INPUTted choice. 
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38(J — 410: Displays everyone's updated scores. 

420: Players are informed that another round is to be 
played; a GOTO 220 starts the formation of a 
new random layout. 

430 — 490: Final scores are displnyed, from highest to low- 
est using a bubblesort; players are asked whether 
or not they wish to play another game. 

500 630: Instructions; uses the subroutine loeated at lines 
30—40 to flip seven pages of text onto the screen. 



03B2 

tdO 077F 

290 ... . OAFS 

470 0E83 

550... 134B 
END... 177A 



The listing: 



10 DIMAZ (25, 13) , CB*(15),N(16) : TC 
~1 19:PM0DE4 

20 pmode4:ci_S0:goto90 

30 PRINT8481, STRING* <30, 128); : PR 
INT@485,"HIT <ENTER> WHEN READY" 

40 A*=INKEY*: IFA*OCHR*<13>THEN4 
0ELSECLS: RETURN 

50 DATA8,20,34, 65, 127,65,65,60, 1 
8, 18,28, 18, 18,60,28,34,32, 32,32, 
34, 28,60, 18, 18, 18, 18, 18,60,62,32 
, 32 , 60, 32 , 32 , 62 , 63 , 32 , 32 , 62 , 32, 3 
2 , 32 , 30 , 32 , 32 , 38 , 34 , 34 , 28 65 , 65, 
65, 127, 65,65,65,28,8,8,8,8,8,28, 
2 , 2 , 2 , 2 , 2 , 34 , 28 » 67 , 68 , 88 , 96 , 80 , 7 
6,67 

60 DATA32, 32, 32, 32,32,32,63,65,9 
9,85, 73,65,65,6b, 65,97,81 ,73, 69, 
67, 65, 28, 34, 65, 65, 65, 34, 28, 60 , 34 
, 34,60, 32,32,32, 28, 34,34, 34,42,3 
6, 26, 60 , 34, 34 , 60, 40, 36, 34 , 28 , 34, 
16,8,4,34, 28, 62,8,8, 8, 8,8,8,65,6 
5 , 65, 65, 65 , 65, 62 , 65 , 65, 65 , 65 , 34 , 
20,8 

70 DATA65, 65, 65, 73,85,99, 65,65,3 
4,20,8,20,34, 65,65,34, 20,8,8, 8,8 
,62,2,4,8, 16,32,62,124, 130, 130, 1 
30, 130, 138, 134, 126, 1, 1,1,72,72,4 
8 

80 DATAAACIOT, ABI LTY, ABJQMQ, ACDE 
MP, ACEL,RS, ADENVZ , AHMORS , BFIORX , D 
ENOSW, DKNOTU, EEFHIY, EGINTV, EGKLU 
Y > EHNIPS, ELPSTU, G I LRUWY 
90 FORF1=0TO25: FORF2«0TO12STEP2: 
READAZ (Fl , F2) : AZ tFl , F2+1 ) =AZ (Fl , 
F2) : NEXTF2, F 1 : FORF1 =0TO1 3 : READAZ 

( 16 ,F1 > : NEXT: FORF1-0TO15: READCB* 

(Fl) : NEXT 

100 SE*-" R2EU4HL2GD4BR 1 2FR2EUHL2 
HUER2NFBR5NR4D3NR3D3R4BR4R2EUBU2 
UHL2GD4BR6RDLU " : M 1 *= " EH 1 03, 162E2 
D6NL2R2BR6U6F2E2D6BR4U6BR4ND6F4D 
2U6BR4D5FR2EU5BR4R2ND6R2BR4NR4D3 



NR3D3NR4 " : S3*-"BM 1 09 , 1 60R4D3NL3D 
3NL4BR3XSE*; " : S1*="BM109, 162E2D6 
NL2R2BR3XSE*J " 

110 AP*«"BM8S, 137U4E2F2DNL4D3BR3 
; U6R2F2D2G2NL2BR5? U6R2F2D2G2NL2B 
R9NU6R4U6BR3J D3ND3R3EUHNL3BR7; D3 
ND3R3EUHNL3BR4D6R4U6L4BR7D6BR3U6 
F4D2U6BR3R2ND6R2BR6NFL2GDFR2FDGL 
2H" 

120 CLS : PRINTS76 , " BOGGEL" : PRINTS 
174, "BY":PRINT@233, "STEPHEN LAI 
":PRINT@3S6, "DO YOU NEED I NSTRUC 
T IONS "5 : INPUT A*: IFA*="Y"THENGOSU 
B500130 CLS:PRINT@66, "HOW MANY P 
LAYERS (1-8) " | : I NPUTPL: I FPL< 10RP 
L>8THEN130ELSEDIMSC(PL) , NA*(PL> , 
FS ( PL ) : FORF 1 - 1 TOPL : FS ( F 1 ) =F 1 : NE X 
T 

140 forfi-itopl:cls:printsprint" 

WHAT IS YOUR NAME, PLAYER"F1 
150 INPUTA*: IFLEN (A*) >9THENPRINT 
"PLEASE, UNDER 10 LETTERS" 5 : QOTO 
150ELSENA*(F1)=A*:NEXT 
160 CLS:PRINT@69, "DO YOU WANT TO 
PLAY BY "5 : PRINTS 133, " (S)CORE OR 
(R) OUNDS" 5 : INPUTC*: IFC*="R"THEN 
C=2: GOTO180ELSEIFC*< >"S"THEN160 
170 C=l : PRINTS225, "WHAT SCORE DO 
YOU WISH TO PLAY UP 



STOCK & FUND INVESTING 

with the 

TRS-80* COLOR COMPUTER 

USE FUNDGRAF& FUNDF1LE 

FUNDGRAF is a stock market analysis program that not only 
graphs and analyzes funds or stocks, but also makes decisions 
on when to BUY and SELL. 

• GRAPHS fund's progress (up to 200 weeks). 

• SUPERIMPOSES for comparison: 

- a line of constant percent gr«wth. 

- a graph of any other fund (or stock). 

• CALCULATES over any give ' 

- (he nsrcenl price change. 

- the moving overage (any span). 

• INDICATES BUY and SF.LL signal- 

- FUNBGRAF - 

TAPE @ S49.95 
DISK @ $69.9? 

- FUNDFILE - 

DISK only® $27.95 

• ADD $2 Handling fi 
all orders, 

• Details? SEND SASE 

• 16 K ECU 
- printer optional 



1 I 1 t 1 1 1 i 1 1 

FUNDGRAF - A STOCK 

MARKET ANALYSIS 
PROGRAM TOR I6K EX 
TRS-50 COLOR COMPUTER"' 



sEND SASI — ' - ■ ' 

1 Requir'd. tRS -« «■« cowvtE* -m riw 

°P tional j) t I i I i I I 



FUNDFILE is a portfoHo and account management 
program Tor securities. It creates Tiles for up to 9*0 transactions 
& 30 securities and reports asset value, realized & unrealized 
capital gains, adjusted costs (Tor stock dividends), and MORE!! 

PARSONS SOFTWARE, DEPT. A 

118 WOODSHWb »RIVE 
PARKERSiURG. WV 2SI0! 
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TO"? : INPUTHS: GOTO 190 
180 PRINT@225,"H0W MANY ROUNDS D 
O YOU WISH TO PLAY"; 
: INPUTRO 
190 CLS0 

200 PCLS:FORF1=0TO64STEP4:LINE(F 
1,0>-(191+F1, 192) „PSET:LINE(Fl f l 
92)-(19l+Fl,0) ,pset:next:forfi=6 
BT0235STEP4 : A-255-F 1 : A 1 -F 1 -64 : L I 
NE(F1,0)-(256,A),PSET:LINE(A,0)- 
(0,A),PSET:LINE(0,A1)-(A, 192) ,PS 
ET:LINE(256,A1)-(F1, 192>,PSET:NE 
XT 

210 LINE ( 100, 156) - ( 156, 170) , PRES 
ET,BF:LINE(36, 123) -(220, 144), PRE 
SET>BF:LINE(37, 124) - (219, 143) , PS 
ET,B 

220 A=RND(-TIMER) : LI NE (65, 9 ) - ( IB 
4, 109) , PRESET, BF:L=16:F0RF1=1T01 

6:N(fd=fi:next:forfi-itoi6:a-rn 
d(L):t-N(A) :N(A)=N(L) :L=l-i:poke 
999+fi,t:next:forfi=itoi6:n(fd = 

PEEK(999+F1) : NEXT 

230 FORF1=0TO3:FORF2=0TO3: A=N(F1 
»4+F2+ 1 > - 1 : Q= ASC ( M I D» ( CB* (A) , RND 
(6), 1) >-65:FORF3=0TO13:PdKE2025+ 
F 1 »768+F2»4+F3»32 , AZ (Q,F3) : NEXTF 
3,F2,Fl:LINE(3B, 1 25 ) - (218, 1 43) , P 
SET , BF : PLAY"T25L25BAGFEDCDEFSAB" 



EXTENDED BASIC REQUIRED 
SEND FOR COMPLETE 
PROGR AM LIST 

ACCESS PROGRAM MARKETING, LTD . 

PO BOX 23275 
CHAR LOT T E, NC 28212 



: SCREEN 1 , 0: T I MER— 0 

240 TI=INT(TlNER/60): IFTI>TC 80S 
UB260 

250 TT=INT (TI/30) : T2=TI-TT#30iLl 

NE(38+T2#6, 1 25+TT«3) - (44+T2#6, 12 

7+TT»3 J , PRESET, BFJ SGTG240 

260 ONCH+1 GOTO270, 280,290*300,3 

10,320,330 

270 DRAWM 1 *: FORFl= 1TD2: FORF2=0TO 
1 : SCREEN 1 , F2: PLAY-05T255L25SBFA" 
: NE XTF2 , F 1 : SCREEN 1,0: CH= 1 : TC« 1 24 
: RETURN 

280 DRAWC0XM1 »; C5" : CH=2: TC=149: 
RETURN 

290 DRAWS3* : FORF 1 = 1 T02: FORF2-0TO 
1 : SCREEN 1 , F2 : PLAY"03FCG" : NEXTF2, 
Fl : SCREEN 1 , 0: CH=3; TC-154: RETURN 
300 DRAW " C0 X S3* ; C 5 " : CH=4 : TC= 1 69 : 
RETURN 

310 DRAWS1*:FORF1=1TO2:FORF2=0TO 
1 : SCREEN 1 , F2: PLAY"02EDA" : NEXTF2, 
F 1 : SCREEN 1., 0 : CH=5 : TC= 1 72 : RETURN 
320 DRAWC0XS1 » 5 C3" : CH=6: TC=1 79: 
RETURN 

330 soundi,20:ch=0:tc=ii9:drawap 
*:rp=rp+i 

340 A*=INKEY*: IFA«OCHR* ( 13) THEN 
340 

350 CLS: PRINT075, "ROUND #"RPj:FO 
RFl=lTdPL:PRINTO160,NA*(Fl) ":P 
R I NT "HOW MANY POINTS DID YOU GET 

" ; : Inputa: sc (Fi ) =sc (Fl > +a: next:o 

NC GOTO360,370 

360 FORFl=lTOPL: IFSC(F1)=>HS THE 
N430ELSENE X T : GOTO380 
370 IFRO=<RP THEN430 
380 A=l 

390 CLS:FORF1 = 1024TO1U9:POKEF1, 

128:next:print@10, "round # m rp; :p 

RINTQ65, "PLAYER" J :PRINT@90, "SCOR 
E"» : PRINTA96, STRING* (32, "-">; 
400 FORF 1 "A TOA+5: IFPL<F1 THEN42 
0ELSEPRINT@64+(F1-A+1>»64,NA*(F1 
>+STRING»(26-LEN(NA»(Fl> > , "-") ; : 
PRINT092+ (Fl-A+1 ) »64 , SC (Fl > I :NEX 
T 

410 IFPL>A+5 THENA=A+6: GOTO390 
420 GOSUB30:PRINT"THE CUBES ARE 
BEING SHUFFLED FOR THE N 

EXT ROUND" :GOTO220 
430 CLS7:PRINT@234, "FINAL SCORE" 
; : FORF1 = 1 TO3000: NEXT : 1 FPL=1 THENC 
LS: PR I NT864, NA* ( 1 ) " , " : PRINT "YOUR 
FINAL SCORE WAS"SC ( 1 ) "POINTS IN 
" RP "ROUNDS . " : PR I NT : PR I NT : GOTO490 
440 A=0 

450 A=0:FORF1=PL T02STEP— 1 : IFSC ( 
FS(F1) ) >SC(FS(F1-1) )THENA=l:Al=F 
S(F1) :FS(F1)=FS(F1-1):FS(F1-1 )=A 
1 



GET THE MOST FUN 
AND WORK FROM 
YOUR COCO 

GOLF: PLAY 18 HOLES AT 

ANYTIME 1 TO 4 P LAYE RS 
GRAPHICS AND SOUND 
S 19.9 5 CASSETTE 
£24. 95 — ■ DISK 

LOAN MYNDER: 

FIGURE LOAN VARIABLES 
PRINT AMORT I Z AT ION 
$19,95 CASSETTE 
$ 24.95 ^"DISK 
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460 NEXT: IFA«ltHEN430 
470 A-l 

480 cls: print" player " ; : pr i nts 
26, "score " : prints32, string* ( 32, " 
-">:forfi=a toa+5: ifpl<fi thenbo 

SUB30: SOTO490ELSEPR I NTQ (Fl— A+l ) ♦ 
64,NA*(FS(F1) } :PRINT826+(F1-A+1> 
«64,SC(FS(F1> > :NEXT:BOSUB30 
490 I FPL >A+5THENA=A+6: 6OTO4B0ELS 
EPRINT"DO YOU WANT TO PLAY AGAIN 
( Y/N> INPUTA*: I FA*= " Y " THENRUNE 
LSEEND 

500 CLS: PRI NT873, " INSTRUCTI ONS " : 
PR I NT: PR I NT" EACH PLAYER WILL N 
EED A PAPER AND PENC IL. " : PR I NT : P 
RINT" THE OBJECT OF THIS SAME I 

5 TO LIST AS MANY WORDS AS POSSI 
BLE WITHIN A GIVEN TIME LIMIT. 
WHEN A WORD A FOUND, IT IS WRITT 
EN DOWN. " 

510 GOSUB30 

520 PR I NT: PR I NT" WHEN THE TIMER 
STARTS, EACH PLAYER SEARCHES 

FOR WORDS OF THREE LETTERS OR 
MOREi THE TIME LIMIT FOR FINDIN 

6 AS MANY WORDS AS POSSIBLE IS T 
HREE MINUTES. SIBNALS ARE SOUN 
DED AND FLASHED WHEN ONE MINUTE, 

30 SECONDS, AND"; 



530 PRINT "10 SECONDS ARE LEFT.": 
PRINT:PRINT" THE 'Q' IS FOLLOWE 
D BY A 'U* FOR THE REASON THAT 
* GP IS AL- WAYS FOLLOWED BY A ' 
U» IN THE ENBLISH LANBUABE. »Q 
U' COUNTS ASTWO SEPERATE LETTERS 
. " ; : 6OSUB30 

540 PRINT: PRINT" WORDS ARE FORM 
ED BY L INKING ADJACENT LETTERS 
TOBETHER. LET- TERS MUST JOIN I 
N PROPER BE- QUENCE TO SPELL 
A WORD- THEY MAY JO IN HORI 20NTALL 
Y, VERTICALLY, OR HORIZONTALLY. 

550 PRINT: PRINT" NO SINGLE LETT 
ER MAY BE USED MORE THAN ONCE A 

WORD, BUT IF THERE ARE TWO LE 
TTERS OF THE SAME TYPE IN DIF 
FERENT POSIT IONSOF THE BRID, BOT 
H MAY BE USED. ":BOSUB30 
560 PRINT: PR I NT" ANY WORD, WITH 

THE EXCEPTION OF PROPER NOUNS, 

is acceptable, as lonb as it ca 
n be found in a standard enblish 

dictionary. ": print j pr i nt" plur 
al and s insular nouns can be wri 
tten down as seperate words, 

and both will recieve "; 
570 pr i nt "full credit. ": bosub30 
580 pr i nt: pr i nt" when the timer 

stops, everyonestops search inb 
for words. One At a time, each 
player reads his li9t of words, 
if one or more other people con 
tain that exact word on their li 
st, the word is crossed out from 

ANY LIST THAT "f 
590 PRJNT"CONTAINS THAT WORD.":G 
OSUB30 

600 pr i nt: pr int" the computer w 
ill sibnal you to 'add up point 
s* . the scorinb boes as follows 
: ":print@161, "word lenbth":print 

@192," 3 4 5 6 7 6 OR MORE 
":PRINT@257, "P0INTS":PRINT@2BB, " 
1 1 2 3 5 11" 

610 print:print- only count wor 

DS ON YOUR LIST THAT HAVEN'T BEE 

N CROSSED OFF. AFTER YOU ADD UP 

your points forthe round, press 
<enter>":bosub30 
620 print:print" a same is won 

AFTER A PLAYER HAS EITHER EQUAL 
LED OR TOPPED A CHOSEN HlBH SCOR 
E OR BY THE PER-SON WITH THE HIB 
HEST SCORE AFTERA CHOSEN NUBER 0 

F ROUNDS. ": PR INT: PRINTQ224, " 

— END-OF-INSTRUCT IONS " 5 

630 BOSUB30: RETURN 



Introducing - MiRE Quality Software by MSI. 



Featuring 
Computer - 



: C«LtR FINANCE for the Color 
32k Ext, Diak req'd- $59.95 



Features include: -s- 

* User Friendly - No programming knowledge 
required 

* Fully documented/ Kasy to use 

* Maintain up to 21 Asset, 21 Liability, 
tod 54 Expense Accounts 

* Print Options (Account Statements, Budgets, 
Trial Balance, A MORE!} 

* Backup/Restore To Cassette Tape 

* Large 42 x 32 screen display 

" Sample Session Included for Fast and Easy 
Instruction. 

ONLY $59.95 

■ ■. exclusively from 

Delker Electronics, Inc. 



DEIKER 

IB 



(■ealer inquiries welcome! 
Delker El*ctr»nics. Inc. 
P.O. Box 85)7 

Dept n 

Smyrna, TN 37167 
806-251 -5018 

615-459-2636 (Tennessee* 
TN 800-545-2502 
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By Roger Schrag 

Roger Schrag updates his popular Patch m disk for Radio Shack's Editor Assembler Program. 



In the December issue of the Rainbow, I presented a 
program that would patch Radio Shack's, ED ! ASM- 
cartridge to store programs On dink instead of on tape 
Since ihen I have added a whole host of new features to my 
patch program. Now 1 would like to present Super Patch, an 
entirely new patch program. It is shown in Listing 1. 

What does Super Patch do, you ask? Lots of things. It 
patches the Ed;tor k> t!iat> ou may load or write source code 
to disk. It also allows you to assemble your programs 
directly onto disk, as well as verify anv disk file, 

Super Patch modifies ZBUG so that you may load a block 
ot memory from disk, either normally or offset. It also 
allows you to write anv block ol memory to disk, as well as 
display a file directory of an\ drive on the screen or the 
printer. 

Super Patch also provide; many minor features and con- 
veniences, namely a repealing keyboard, custom cursor and 
automatic selection of the default disk drive and printer 
baud rate- 
To add ail these features I o EDT ASM+. wc must make it 
reside in low memory. Transferring it tram ROM to RAM 
allows us to alter sections of code, and in insert whole new 
routines. Unfortunately, moving EDTASM+ to RAM eais 
up a lot ol our memory that could otherwise be used for 
program storage. Or. a normal 32 K Col»r Computer you 
will only have about 17K oi storage space for your source 
code. 

However, this brings us up to Super Patch s most power- 
ful Jeature. It supports MK! If you have installed the 64K 
modification in your computer, or if you purchased your 

(R<>ger Schrag, a high .school senior, enjoys working 
with the CoCu and writing for the Rainbow. He alto 
deugrts and translates programs for Adventure 
international.) 



machine after approximately •ctober. 1982, Super Patch 
will automatically use all of your system's memory, giving 
you about 49K of space lor your programs. But don't frcl if 
your computer doesn't have ihc 64K ability — Super Patch 
will still work fine. 

Here's how to use Super Patch to create your enhanced 
version of EDI ASM f: First, insert your EDTASM+ car- 
tridge and turn on your computer, When the sign-on mess- 
age appears, go into ZBUG and enter U C000 1000 27FF. 
This will copy EDTASMT into low memory, where the final 
patched program will reside. Dump a copy *f it onto tape by 
entering P EDT ASM 1000 37FF 1000. 

Next, return to the Editor and enter the source code 
shown in l.isling i. Notice the section labeled Program 
Customization. There are several decisions you will have to 
make based on your own personal preferences and the 
equipment you have. Let's look them over; 

Your first option is the cursor formal. The program as it 
appears in the listing will give you a red blinking cursor, 
Howe\ cr. the comment lines sh*w three other types of cur- 
sor you may use. Let's suppose that you would rather have a 
solid black cursor than a blinking red one, You would insert 
asterisks to make lines 20 and 21 into comment lines, and 
remove the asterisks from lines 2ft and 27, 

The next option is the default drive, Any time you are 
asked for a filename and you don't specify a drive number, 
the default drive will be used. Since 1 only have »ne drive, 
,'cro must he mj default. However, if you have tw« drives, 
you might find it more convenient to have drive one as the 
default. 

The next option is the status of the verification system. As 
listed, the program will verify every sector that is ever writ- 
ten on the diskette. This is a good precautionary measure, 
but it slows down write operations by about SOpercent. The 
choice between speed and safely is all yours. This won't 
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affect the speed of read operations, such as loading source 
cmde. 

The next option is the printer's Baud rate. If you have a 
Radio Shack printer, you will probably want to select 600 
Baud. But if you have a printer that doesn't operate at the 
standard 600 Baud, you may use this option so that you 
wont have to POKE tht Baud rate constant each time you 
want to use your printer. 

The remaining options relate to the repeating keyboard, 
You may want to try various combinations for RATE1 and 
RATE2 until you find what is most comfortable for you 
Some people may not want certain keys to repeat, so the 
final option allows you to keep the ENTER BREAK, and 
CLEAR keys from repeating. 

Afteryou have selected all of your options, enter the rest 
of the source code shown in Listing 1 exactly as it appears. 
Assemble it onto tape directly after the copy of EDTASM+ 
you made f rom ZBUG. Save, the source code right af ter that. 
You may want to look it over or modify it at some future 
time. 

Now you are ready to put everything on disk, so you will 
need to connect your disk controller. Please turn off your 
computer when you remove the cartridge and insert the 
controller. You should always play it safe and shut off the 
computer when you exchange cartridges. 

Rewind your cassette tape all the way and turn on the 
computer. When the Disk BASIC sign-on message appears, 
enter CIO A DM to load the RAM version of EDTASM+ 
saved from ZBUG. but don't execute it yet. When OK 
appears, type CLOADM again to load in the assembled 
patch program. Don't execute it, either. The patch program 



will overwrite various sections of EDTASM+ as it loads, 
and a block of new code will be added on. 

When OK. reappears, you are ready t* save the final 
product onto disk by entering SAVEM"EDTASM", 
&HE00,&H3?FF,&HE00, Save as many copies on different 
diskettes as you like. 

Now enter the program in Listing 2 fr«m Disk BASIC and 
save it on your diskettes right along with EDTASM I .This 
is a utility to transf er s»uree code files f rom tape to diskette. 
You will probably want to transfer the source code from 
Listing I right away, bef ore you forget which tape you put it 
on. 

Your Super Patched EDTASM + is now ready to use. 
Simply type LOADM "EDTASM ":EXEC and press 
ENTER to load it. It will reside in memory from $E00 to 
S37FF, and use memory from $3800 to S39FF for internal 
use. All memory f rom S3 A00 on up to S7FFF, or SFEFF on 
a computer with the 64K capability, will be available for 
your program storage. 

Super Patched EDT ASM+ is completely position inde- 
pendent, so you may load it offset. F : or example, the com- 
mand LOADM"EDTASM",&H1000:EXEC will load 
EDTASM+ into memory from $1EM to $47FF, and 
memory from $E00 to SIDFF will be left untouched. You 
could use this memory for graphics pages, assembling 
directly into memory, or whatever you wish. 

The I., W, V,and A commands of the Editor have all been 
modified. To l»ad source code from diskette, press L and 
ENTER. You will be prompted to enter the filename. Any 
filename valid in BASIC is valid here, but don't enclose it i n 
quotes. Also,ifyoudon'tincludeanextension, none will be 
used. An extension isn't mandatory, but I would recom- 
mend that you use the extension /SRC for all source code 
files you create. 

Finally, if you don't specify a drive number, the default 
drive will be used. Once you enter the filename, the source 
code will be loaded. 

The Wand V commands work in much the same way. All 
the V command does is merely open thef ileand immediately 
close it. This verifies that a file does Indeed exist, and that 
there iren't any serious problems in the diskette's directory. 

To assemble a program, type A and any assembly 
switches you would like to use, Then press ENTER. Unless 
you specify the IM or NO switches, you will be prompted for 
the filename. You should give any program you assemble 
the extension 'BIN, but, as always, no extension will he 
assumed if you don't specify «ne. 

As lines of assembled code scroll across the screen, the 
computer will pause every now and then to write a sector t» 
the diskette. You may press BREAK to abort the assembly, 
but you will have to wait a few seconds for the computer to 
first close the disk file. 

A word of caution is in order. Never press the Reset 
button while the red light on any of your drives is on. If you 
were to press Reset while the computer was writing a sector 
on the diskette, you would probably have to reinitialize the 
entire diskette with DSKfNI. This applies to all situations, 
not just when using EDTASM+. 

The L, P, and V commands of ZBUG have also been 
modified. About the last one, the V command, a word is in 
order. The unpatched version of EDTASM+ on cartridge 
hasa V command in the Editoranda Vcommand inZBUG, 
Both do the exact same thing: verify a tape file. As we have 
already discussed, the Editor's V command has been 
patched to verify a disk File. ZBUG's V command, however, 



GRAND SLAM BRIDGE 



0 



SHARPEN UP YOUR BRIDGE GAME. COM- 
PUTER BIDS YOUR PARTNER'S HAND AND 
PLAYS THE OPPONENT'S HANDS. RAN- 
DOM HANDS DEALT EACH TIME. CARDS, 
TRICKS, BIDS, AND CONTRACT SHOWN 
ON SCREEN, yesss 
32K CASSETTE S19.95 



J> STOCK OPTION STRATEGIES ^ 

DEVISE YOUR OWN STOCK OPTION STRAT- 
EGIES. COVERED OPTIONS, STRADDLES, 
CALLS, AND PUTS. % GAINS AND LOSSES 
VS. FUTURE STOCK PRICES GRAPHED IN 
COLOR. EASY TO USE, NO DATA BASE RE- 
QUIRED, JUST ENTER FROM KEYBOARD. 
MENU DRIVEN. 

16K CASSETTE $14.95 



SEND CHECK OR MONEY ORDER TO: 



GREENTREE SOFTWARE 
P_0. BOX 97 
GREENWOOD. IN 46142 
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has been transformed into a whole new command for dis- 
playing file directories. More on that later. 

To load a maehine language program or block of memory 
from ZBUG, press Land ENTER. You will be asked for the 
filename and the program will be loaded. You may specify 
an offset directly afterthe L, if you wish. Forexample, L 100 
will load the program offset by $100, or 256 bytes, 

To put a block of memory onto d iskctte, press P followed 
by the starting address, the ending address, and the execu- 
tion address. You will be asked for the filename and the 
block of memory will be written. This command may be 
used to duplicate programs (no pirating please), save blocks 
of data, and so f orth. As an example, the command P 5000 
6000 5200 will write everything in memory from $5000 
through $6000 onto diskette. The program will begin execu- 
tion at $5200. 

The F command will display a directory of all files on a 
particular diskette. To display the directory on the screen, 
type in FS and number of the drive containing the diskette. 
To print up the directory on your printer, typein FP and the 
drive number. In either case, you may leave out the drive 
number and the default will be used. 

You may press "shift @ " to freeze the display just as you 
can with the DIR statement in BASIC, but don't press 
BREAK! Doing so will return you to BASIC. If you forget 
and do press basic, press Reset to reenter ZBUG. 

From ZBUG, you are not able to examine the BASIC and 
disk system R#M's. Instead, you are able to examine the 
upper block of 32K. RAM that usually isn't accessable from 
Basic. If your computer doesn't have the 64K capability, 
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looking at this upper block of memory may give strange 
resu Its. 

We've now covered just about all of the features provided 
by Super Patch. To summarize, only the L, W, V, and A 
commands of the Editor, and the L, P, and F commands of 
ZBUG have been modified. Everything else should operate 
as it always has, except for the new cursor and repeating 
keyboard. 

Now I have a puzzler question for you. If you look at 
addresses SE25C through SE269 of the unpalchei 
EDTASM+ cartridge, here is what you wiJl find; 

LEAX 0BE33,PCR 

LDA I8E 

STA ,X 

LDU 18F 

STU I,X 

This routine is executed by ZBUG just before printing the 
BRK. @ message whenever a breakpoint is encountered. 
Does anyone have any ideas as to why Microsoft would 
make ZBUG attempt to write to the Color basic ROM? 

This article represents the start of a new series of articles 
about somewhat more advanced applications of assembly 
language. If you have any topic suggestions, or if you have 
any questions about Super Patch, feci free to drop me a line. 
My address appears at the top of the first listing, Please 
include a self addressed, stamped envelope, and 1 will 
respond as promptly as possible. 



Listing 1: 

08011 ttmmtmttmmmtttt 

88802 * SUPER PATCHED EDTASH+ * 
30113 tmtmmmmmmmt 

am » 

88885 *By: Soger Schra$ 
8808i » 2854 Manning Avenue 
00087 » Los Angeles, CA 90025 
00888 » 

83309 *Final revision! 5/85/83 
08010 * 

80*11 *» Pro$ras Pustoffii zatian »** 
88012 *For each option, alternatives are 
8001 J tshown below in ccswnt lines. c eel 
H0014 *free U substitute these <ar your 
80015 *om) alternative! according to your 
MI01& #personal preferences 

00017 t 

00018 t 

80019 *Cursor format 



08028 CURSOR EBU 


(60 


Red cursor 


00821 BLINK £QU 


*9F 


Blinking 


00822 *CURSQR EBU 


IFF 


Red cursor 


80823 *BLINK EBU 


i#8 


Nop blinking 


20024 *€0RSDR ESU 


m 


Slack cursor 


00025 *BLM HSU 




Blinking 


80026 eCWiSOR EBU 


m 


Biack tursor 


0002? *BLINK EBU 


$00 


Non blinking 



00028 * 



70 
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Mm ♦ 

00030 ♦Hhich drive is the default drive 
08031 DEFALT EQU $0 Drive zero 
00032 ♦DEFALT ECU II Drive one 
00933 ♦ 
00034 # 

03035 ♦Whether or not all write operations 
01036 ♦should automatically be verified 



00058 ♦ 

00059 ♦ 

00060 ♦Hhich keys have the repeating feature 

00061 REPRES EQU I7F Every key repeats 
10062 tREPRES EQU $3F Every key repeats 
0»63 t EXCEPT: Enter, Clear, and Break 
00164 # 

00065 t 



0003? VERIF EQU 


IFF 


Verify everything 


00066 


•Change the sign-on sessage 


00038 »VER1F EQU 


$00 


Don't verify 


00067 


ORB $1056 


0003? t 






00068 


FCC /SUPER PATCHED EDTASIIt 1,0/ 


00040 ♦ 






00069 


FCB $0D Carraige return 


00041 tPrinter's baud 


rate 




00070 


FCC /IP By MICROSOFT/ 


01042 BAUD EQU 


11 


9600 baud 


00071 


FCB )A0 Teriinator 


00143 *IAUD EBU 


157 


600 baud 


00072 


I 


10044 *BAUD EQU 


IK 


300 baud 


00173 


♦ 


00045 > 






03074 


♦Fix an apparent bug in Zbug 


#0046 * 






00075 


ORB $2D4E 


00047 »How long you must hold down a key 


02076 


LEAH I326A.PCR Load SMI vector 


00048 ibefore it starts repeating 


00077 




00049 RATE1 EQU 


HE 


Half a second 


00078 


t 


00050 tRATEl EQU 


$0F 


Suarter of a second 


00079 


♦Change the filename handling systen to 


03051 ♦RATEl EQU 


$3C 


One whole second 


00010 


tallow the user to enter full disk file 


00052 t 






00081 


♦nates fin the FILENAKE/EITrD foriatl 


00053 * 






00082 


0R6 I15E0 


00054 ♦Rate at which 


the keys repeat 


00083 


L8RA FNANE 


00055 RATE2 EQU 


$03 


Hediui 


00084 


* 


00056 »RATE2 EQU 


102 


Fast 


00085 




00057 §RATE2 EQU 


106 


Slow 


00086 


♦Change references to device 1-1 (tape) 




INVITED . g" 
- QUANTITY- l^BbGftJHTS, 

available . -- ;: -: : :^"\.''- 
;'; to -ordfk send $34'i3 + *1.30 shipping** to: 
Micro Script, Inc. : eox z«& mmpt ph, nx 

MC BRfeA06OA«n-WOt INCLUDED 
■ bJATt WLSIOLNJH AOt> SAUfcS SAX 
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00087 

00098 
00089 

03090 
00091 
03092 
00093 
00094 
00095 
00096 
00097 
0U099 
00099 
8020* 
00101 
10112 
00103 
00104 
00105 
00106 
00107 
00108 
00109 
00110 
00111 
30112 
00113 
00114 
00115 
00116 
00117 



♦to device *1 (disk) 



ORfi 


$1547 


LDB 


11 


0R8 


♦1574 


LDB 


11 


ORG 


$15AD 


LDA 


11 


ORG 


$15CB 


LDA 


tl 



♦Hake the Editor dese the disk file 
♦*hen access to it is complete 

ORG $1152 

L8SR ECL08E 



♦Make Zbug close the disk file 
♦when access to it is cojiplete 

0R8 I2D88 

L8SR ZCLOSE 



♦At the right tiae, call a routine 
♦to open the disk file, instead of 
♦a routine to open the tape file 

ORG $15B7 Patches into 
LEAU ASSEH.PCR 
BRA $15D7 the "A" coMind 
ORG $15BF Patches into 
LDU ILQAD the "L" cowand 



10118 


QRS 


J15C4 Pstchfs into 


ff!19 


LOU 


WRITE the *H* roMind 


08120 


ORG 


$1637 Patches into 


88121 


LEflU 


L0AD,PCR 


00122 


BRA 


$1507 the "V coBsand 








10124 * 







10125 tfiltgr the error handling routine to 
00126 *accouflt for nen error tess&ges 



$1721 

ERROR Compute error code 
Clear soie flags 



tl 



ERfiS,PCR List of messages 
$121E Print error tessage 



00127 

0012B L8SR 
M129 CLR 

00138 CLR 

00131 LEAK 

00132 LBSR 

00133 » 

00134 * 

00135 input routine so that if you 

00136 irespond to "FILENAHE?* prospt by 

00137 Hutting Break, you will be returned 
0013B *to the Editor or Zbug properly 

00139 ORB *1EF0 

00140 LBEB *172F 

00141 » 
10142 * 

00143 Ulake Zbug's "P" roaaand write 

08144 *tc disk, by using the RON routine 

03145 tthat nortallj> processes the Basic 

00146 istateient "SflVEH" 



00147 


ORG 


*16C9 




0014B 


CLR 


♦FFDE 


Select ROMs 


00149 


JKP 


<CEA2 


Use RDM routine 


00150 


CRS 


I31AD 


EJitinate a tape 


80151 


NOP 




Filename check 


00152 


W? 






03153 


NOP 






S0S54 


NCP 







00155 KOP 

001 56 * 

00157 t 

00158 *ffake Zbug's "L" coflnsnd load 

0015? *froa disk, by using the ROM riutine 

00160 tthat norially processes the Basic 

00161 Htatetent "LQADH" 



00162 


□R8 


I163F 


The offset is in U 


00163 


PSHS 


L ! 


Put offset on stack 


00164 


LOU 


ILOAD 


Bet the filename and 


00165 


LBSR 


<15C9 


Open file for input 


00166 


PL1S 


X 


Retrieve the offset 


0016? 


PSHS 


DP 


Save Direct Page 


0016B 


CLRft 




Clear the Direct 


00169 


TFR 


A, DP 


Page register 


$2119 


STJ 


«P3 


Store the offset 


00171 


CLR 


tFFDE 


Select ROHs 


00172 




ICF07 


Use RON routine 


00173 


CLR 


♦FFDF 


Turn on 64K 


#0174 


PULS 


DP,PC 


Restore DP & return 


00175 


DR8 


*31A4 


Eliminate s tape 
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mostcomprehensive Study 
Program available today! 

-SuiKis test-radirxi sfui:j tu..t^h ir> 



COMPUTER SAT 

hrepa^at- 



Computer Software 

■Storts arid limes your perform, _ _ 
•calculate Gwieoe Board equnrafent 

•Diagnoses ymrf strengths and weal 
nsssestnlSteysmMcr shirty 

•Pre critics specilic drill ma 
on computer and In the textbook 
improve your score 

Available For 

*TR&» Model III'. "4' with 48K 

•Atari WQMJQO" 
•Cimniudoic 80 - 

COMPUTER GRE 



■MtComgtfef Drill Itwn 

Complete Tartbook 

• H»t»»BPr««rtlM»)i$«r*470 

Fitl-Lingtlt I 

answers in CMiiputef Ii 
infj and diagnosis 



MOMstlon 

User s Manual 



This program freips Prapare "Jnder- 
auduafes lor trie Graduate Beuord 

•Apple" with 48K 

•3 double-sided diskettes wtlh Graphic 

jocular Idi "He* :a B repire 

•A:ota%u:id«flta>irJahle "User Ineml- 
\f User's Manual 

COMPUTER ACT 

Preparation 

•Attmp tot How to prepare lir 

•3 double sided computer diskettes 
-50 page User's Manual 
•ADDle 1 with m 




FDR CREDIT CARD ORDERS 

CALL TOLL-FREE 
800-543-1918 

(In California call etJIect (6195 6 



Harcourt Brace Jovanovich, Inc. 

Oe»t C-orrpite- SAT R-3-B3 ?50 6h Avenue. San Ciejo. CA 9210" 
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Filenate check 



00176 RTS 
0817? * 

mn * 

0#179 tChange Zbug's *V* couand into an "F* 
32180 #eo»iand which does a disk directory 
00181 ORG $2EAB Zbug's conoand table 

001B2 FOB DIR-$2D4E Address of ce»»and 

§0183 FCC »F» Change *V" to *F" 

00184 < 
08185 * 

{0186 tNipe out son calls to tape related 
lilB7 troutlnes in RDM that are no longer needed 



00188 


ORS 


00189 


NOP 


00190 


NOP 


00191 


NOP 


00192 


0R6 


§1195 


RTS 


00194 t 




00195 ♦ 





08196 ♦filter the keyboard input routine so 
80197 *that *e nay define a custai cursor 

00198 ORG 11319 

00199 LSB *CURS0R Set cursor character 

00200 EORB IBL1NK Blink it if necessary 

00201 l 

00202 * 

00203 »Hake EDTASH* use our routines instead 

00204 *of those contained in the RON 




Present* 



"JUDE" 

A full text, constientary & Ref . 
study on tho Epistle of St. Jude. 
It speaks to the heart mf 20th 
century ftraarica. ft must for Pas- 
tors, Sunday School Teacherfe, 
any serious Stu»i«nt of the "WORD". 
Req. 32K E.C.I. 
Cassette $13.99 Disk $16.99 
Ideational 3-cjamc I'ack 
Books of the Bible (memory aid) fauna, Bible 
character word scramble ga.me & "Who said 
That" Bible quote game. Req.lSK E. C.B. 
Cassette $10.99 Disk $13.99 

Req.32K B.C.B. 



ut-i <n.i.;i;_v. 

printer VII & DMP 100 



Lists programs generating 125 characters by 
90 lines. Keq.lGR B.C.B. 

Cassette $14.99 Disk $17.99 

QCS 



P.O. BOX 1899 
Duncan, Ok. 73533 
(405] 255-5696 



00205 ORB f 154C 

00285 LBSR INPUT Input fro« a device 

00207 ORG U69C 

00208 LBSR INPUT 

00209 ORG $155D 

00210 LBSR CLS Clear the screen 
80211 ORG $1524 

00212 L&5R KB5CAN Scan the keyboard 

00213 NOP 

01214 0R6 $15B9 

00215 LBSR KBSCftN 

00216 NOP 

00217 0R6 $157E 

0021B LBSR OUTPUT Output to a device 

00219 NOP 

00220 * 

00221 l 

02222 Modify "0" cowand to reenaole ROPls 

10223 *fjefore attesting to return to Basic 

00224 0R6 $1505 

0*223 CLR tFF&E Select RDHs 

M22& CLR IFF40 Turn off disk drive 

00227 JHP $A027 Jutp into Sasic 

00228 * 

00229 ♦ 

00230 ORG $E00 

00231 * 

00232 ♦ 

00233 *NeN sntry point to EDTASN+ 

80234 START LEAX $39FF,FCR Find bottot of net 

00235 TFR S,D Round off to even 

30236 CLRB increment of $110 

0023? STD $FF Set setory painter 

0023S LEftX NN1»PCR Use our wn interrupt 

03239 STX lilA Service routines 

00240 LEAK IRB.PCR Instead of tsose 

#0241 STX $10D In the RflR 

0S242 LBSR $1558 Clear the screen 

00243 LSB IVERIF Set up disk systea's 

80244 STB $987 Verification systei 

00245 LDB IDEFALT Select which drive 

00246 STB $95A dill be the default 

00247 LDX IBAUD Select the printer's 

00248 STX $95 Serial baud rate 

00249 LBRA $1005 Enter EDTASN+ 

00250 i 

00251 » 

00252 *Subroutirte5 called by the program 

00253 *patches to enable the new features 
•30254 * 

00255 * 

88256 *Close any open disk files 

00257 CLOSE CLR $FFQE Select RO&s 

30258 JSR $CA3B Use ROM routine 

00259 CLR $FFDf Turn on 64K 

00240 RTS Return 

002S1 * 

08262 * 

U0263 »?atches for the Editor awl Z&ug 

§g264 cCLGSE BSR CLOSE D:3Se files 
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00265 


LBRA 


$1377 Return to the Editor 


00292 


LDY 


M94C 


Nate storage area 


00244 ZCLDSE 


BSR 


CLOSE Close files 


00293 


LDA 


f$20 


ASCII space 


00267 


LBRfl 


$1367 Return to Zbug 


00294 ERASE 


STfl 




Clear out the 


80268 * 




00295 


chpy 


i$957 


Filenaie storage 


00269 f 






00296 


BNE 


ERASE 


Area 


01270 ♦Routine to allow you to enter a nase 


00297 


CLR 


tFFOE 


Select ROMs 


00271 tfor the disk file. Also, the address 


60298 


m 


JC8A4 


Use RDM routine 


01272 *in U 


is offset so that this prograa 


00299 BACK 


CLR 


IFFDF 


Turn on 64K 


00273 **ill reiain entirely position independent. 


00300 


PUIS 


DP,U,PC 


Restore and return 


00274 FNflNE 


TFR 


U,0 Put address in D 


00301 PROMPT 


FCC 


*FILENft«E?* 


00275 


LEflU 


«0,PCR Calculate the offset 


00302 


FCB 


$A0 


Terminator 


10276 


LEflU 


D,U Add it to the address 


00303 * 








00277 


PSHS 


U Save the address 


00314 » 








00276 


LEAK 


PRDNPT.PCR "FILENAME?" 


90305 'Routines to 


open a disk file. 


0027? 


L BSR 


1122! Print the pro«pt 


00306 »Note the slight differences for 


00280 


CLR 


116 Clear input counter 


00307 *Load, 


Write, 


and Assemble. 


00281 


LBSR 


I1EC4 Get user's input 


00308 LOAD 


LDA 


#$49 


iDnput mode 


00262 


LDB 


*12 Get length of input 


00309 


LDX 


«$1FF 


ASCII fOTMt 


00263 


LDX 


113 Get address of input 


00310 


BRA 


OPEN 


Open the file 


0828* 


PSHS 


DP Save the Direct Page 


00311 URITE 


LDA 


l$4F 


iOMput node 


00285 


CLRA 


Clear the Direct 


00312 


LDX 


MIFF 


ASCII foruat 


00286 


TFR 


A, DP Page register 


00313 


BRA 


OPEN 


Open the file 


00267 


LEflV 


BACK,PCR Save a return 


00314 ASSEM 


LDA 


lt4F 


(O)utput node 


00266 


PSHS 


1 Address on the stack 


00315 


LDX 


§♦200 


Binary foraat 


#0269 


CLR 


,-S Lower th« stack 


00316 OPEN 


STX 


$957 


Store the fortat 


00290 


LBS 


<?5fl Select the default 


00317 


LDX 


1*100 


The recorti length 


00291 


STfl 


$EB Drive amber 


0031B 


STX 


$97C 


is 256 bytes 








00319 


LDB 


#$1 


Use device ii 








00320 


CLR 


$FFDE 


Select ROMs 








00321 


JSR 


$C46B 


Use ROM Routine 



CY-BURNET-ICS 

Specializing In Educational Software 
For TRS-80 COLOR COMPUTER 

CLOCK ARITHMETIC— lor kindergarten through third grade, auto 
load; menusBlects hour,half hour, quarter alter, quartertill, randomiz- 
ing by fifteen minutes. 5 minutes, or by the minute, computer shows 
time by clc-Ck face and student gives digital lime: H key and spacebar 
provide hour and mimiie "eipfb key returns lo menu, graphic and 
musical rewards provided, fi^h 

SIDE 1— DRILL SI!?? SIDE 2 — CLASSROOM TUTOfi 

MINIMUM REQUIREMENTS 3ft EXTENDED BASIC I24.8S 

MULTIPLICATION DRILL — for second grade through high soho*l; 
auto load and menu driven {1 « 1 thru 2 * 9, 1 * 1 thru 5 * 9, 1 * 1 thru 
9 « 9, 0 * 0 thru 1 2 « 12, and 0*0 thru 1 5 x 15), limed, scored, with two 
chances for correct answer; graphic and musical rewards provided. 

MINIMUM REQUIREMENTS 1SK EXTENDED BASIC $24,9S 

BEAT THE COMPUTER-'o' third grade thru adult; auto load, timed 
drill on the multiplication tablesO *Oto 1 2 * 12. Program is divided into 
4 seQuential parts: 1) factors:! x 1 thru 6 « 6. 2j 0 * Qthrii 12 x 12; 31 6 *8 
thru 9*9; and 4) 10 * 10 thru 12 * 12 Musical reward upon oeatlng 
computer An exciting way to learn. Revised Mav 83. 

MINIMUM REQUIREMENTS 18K EXTENDED BASIC $19.95 

"SPECIAL OFFER THROUGH DEC. 31, 1963 
"BOTH MULTIPLICATION DRILL 

AND BSAT THE COMPUTER FOR $19.98 

ALSO AVAILABLE CASSETTE 

Number Readiness Drill 19.95 

Number and Color Word Drill 19.95 

Graphic Alphabet/Audio 24.9S 

Numbers Before. Betweei and After ,24.95 

Addition Drill 24.95 

ALL programs developed by educators and field tested. 
Add 51 .00 percasselte for shipping and handling, Tennessee resioents 
add 8% tales tax. Sand self addressed stamped envelope for ff#a bro- 
chure. Mail Check O' Money Order to: 

CY-BURNET-ICS 

5705 Chesswood Drive, Knoxville, TN 37912 
Phone 615-688-4865 



»FFDF Turn on 44K 
Return 



00322 CLR 

00323 RTS 

00324 * 

00325 ♦ 

00324 *fllter error handling routine to 

00327 *hanrile ne* disk related errors: 

00328 * DF VF NE HP FN FH 

0032? *If the error isn't one of those, 
00330 *it is assuaed to be an 10 error. 



00331 ERROR 


CLR 


$FFDF 


Turn on 44« 


00332 


EXB 


A , 8 


Put the code in ft 


00333 


CLRB 




Clear B 


#0334 


LEflX 


CODES, PCR List of errors 


00335 SETERR 


CNPfl 


B,X 


Coapare the codes 


10334 


BED 


RET 


Return if they natch 


00337 


TST 


B,X 


Check for end of list 


§8338 


SEfl 


RET 


Return if end of list 


0P339 


MCB 




NoYe to next code 


00340 


BRfl 


SETERR 


Compare next on list 


00341 RET 


RTS 




Return 


00342 # 








00343 * 








$0344 Hist of error 


codes 




U0343 COOES 


FCB 


«B 


Disk, full 


30346 


FCB 


$48 


Verification error 


00347 


FCB 


$34 


File i?ot found 


30348 


FC1 


$3C 


Write protect 


0034? 


FCB 


*3E 


Bad filenaae 


00350 


FCB 


$2fl 


Sad file aode 


00351 


FCB 


$00 


Signal end of list 
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80352 t 
01353 t 

00354 Hist of error pessages 

00355 ERRS FCC tDlSK FULL* 
019356 FCB «A| Terminator 

00357 FCC tVERlF. ERROR* 

00358 FCB IM Tersinator 

00359 FCC *FILE NOT FOUND* 

00360 FCB tfli Tersinator 
•1341 FCC *KR!TE PROTECT* 
00342 FCB M Teriinator 

00363 FCC *BAD FILENAME* 

00364 FCB $A0 Terainator 

00365 FCC *BAD FILE BODE* 

00366 FCB m Terminator 

00367 FCC tl/O ERROR* 

00368 FCB «A0 Terainator 
0036? * 

00371 * 

00371 *Routine to do » disk directory 

80372 DM LDX 113 Bet user's input 

00373 CLRA Device 10 (screen) 

00374 DEC 112 Has device specified? 

00375 BUI DR1 Skip ahead if not 

00376 LDB ,!!+ Examine specification 

00377 CflPB 1150 Has it a "P'? 

00378 BNE DR1 Skip ahead if not 

00379 LDA IIFE Device 1-2 (printer) 

00380 DR1 STA )16F Select the device 

00381 *The ">" in the above line is crucial' 

00382 LDA I95A Get the default drive 

00383 DEC 112 Mas drive specified' 

00384 BR! DR2 Skip ahead if not 
10385 LDA t l Bet specification 
00386 AND A H3 Convert fro* ASCII 
0038? DR2 PSHS DP Save the Direct Pa§e 

00388 CLR8 Clear the Direct 

00389 TFR B,DP Paqe register 

00390 STA IEE Select the drive 

00391 CLR IFFDE Select RQHi 
80392 JSR ICBD2 Do a directory 
10393 CLR IFFDF Turn on £>4K 
01394 CLR $6F Reselect screen 
00395 PULS DP, PC Restore and return 
08396 * 

00397 * 

00398 *Routine to input fro« a device 
80399 INPUT CLR *FFDE Select ROMs 

00400 JSR IA176 Use ROM routine 

00401 CLR IFFDF Turn on 64K 

00402 RTS Return 
00401 * 

80404 * 

00405 (Routine to output to a device 

00406 OUTPUT CLR IFFDE Select ROMs 

00407 JSR [IA0021 Use RDH routine 
0040B CLR IFFDF Turn on 64K 

00409 RTS Return 

00410 » 

00411 * 



00412 tRoutine to scan the keyboard 

00413 KBSCAN CLR IFFDE Select ROMs 

00414 ANDCC HAF Enable interrupts 

00415 LDA 1135 Enable the control 

00416 STA IFF03 Register in the SAM 

00417 JSR EIA000] Use ROM routine 

00418 PSHS CC Save the status flags 

00419 CLR IFF5F Turn on 64K 

00420 PULS CC.PC Restore and return 

00421 * 
§0422 * 

80453 *Routine to clear the screen 

00424 CLS CLR IFFDE Select ROMs 

00425 JSR IA928 Uis ROM routine 

00426 CLR IFFDF Turn on 44K 
10427 RTS Return 

00428 * 

00429 » 

00430 *Son-i«.skable interrupt lervice routine 

00431 Nil LDA 1982 Check status flags 

08432 BEG EXIT Exit if invalid 

08433 LDX 1983 Bet transfer address 
S0434 STK I0A,S Put it on the stack 
08435 CLR 1982 Clear the flag 
00436 RTI Return froi interrupt 
08437 * 

00438 * 

00439 *60 cycle interrupt service routine 

00440 IRS LDA IFF03 Check status flaps 



FRUSTRATED 
WITH FOLD-OUTS? 
MADDENED BY 
MANUALS? 
DON'T CURSE 
YOUR CURSOR! 

SEND FOR 



HELP! 

THE VERY BEST COLOR COMPUTER REFERENCE SYSTEM 



..:e COLOR COMPUTER 
Each command i$ indexed by what si does as 
well as what it is called. Every !m'pr<~w>ui&>«s 
is sh»wn with its formula, examples of ho* i ii 
used, a full set of notes, common pitlalis. and 
references to the instruction manual. 
HELP! provides the more ADVANCED 
PROGKAMMER with the perfect reference 
System for checking less familiar commands, it 



Color Basic. 
232 pages, rin< 

REAL SOFTWARE 

Piws-f iertc HEi-P 1 Encloses t "<j S4.M pus $1 s»M33 rg, 
NAME 



ADDRESS - 
CITY _ 



MASTER CAH1 OR VISA 



Massachusetts tesidents add S% sales ta 
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00441 


BPL 


EXIT 


exit it inVdi id 


01442 


LDA 




D aeaf fha Ijfrh 

neseC Cne latin 


80443 


LDA 


$985 


Check drive status 


00444 


BEB 






00445 


DEC 


1985 


Decrease"«otor 'tti»t>r 
ecrease « or tier 


00444 


BNE 






00447 


LDA 




Ti 'e t "h °f f 


0044B 


ANDA 


fiB0 


Disk drive^otor 


0044? 


STA 




Update sotor status 


004S0 


STA 


IFF40 




00451 REPEAT 


LDX 


#■$152 


Start df key data 


0045? RPi 


LDA 


,X+ 


Check a ron of keys 


00453 


CMPA 


IfFF 




00454 


BNE 


RP2 


Bo* if" key" is 5 pressed 


00455 


CHPX 


#*15A 


Has that the last rax? 


00456 


BNE 


RPI 


loop back if not 


00457 


INC 


KCLEAR,PCR Increient counter 


00456 


LDA 


KCLEAR,PCR Has keyboard been 


00459 


CKPA 


»$4 


Clear for .1 second? 


00440 


BNE 


EXIT 


If not, exit routine 


0044! 


CLR 


KCLEARjPCR Clear the counters 


00442 


CLR 


KHOLD.PCR 


00443 


BRA 


EXIT 


E*it the routine 


00444 RP2 


INC 


>CHOLD,PCR Increaent counter 


00445 


LDA 


KHOLD.PCR Has key been held 


00444 


CHPA 


IRATE1 


Long enough to repeat? 


00447 


BNE 


EXIT 


If not, exit routine 


00448 


!UBA 


IRATE* 


Prepare counter for 




sbout this new race, but < 
their home world is located < 
peaceful Bietnberr. •! the Feder' 
also have heard of these ere 
step you! This Program is act 



t one ol the . 



uses the full control oC PMODE4 Hiss color 
developed by owi-WARE DEALERS INQUIRIES INVITED 
Software A uth ors W anted -Hlghgst Royalt ies Paid 



$1.25 Per Order 
Postage & 
Handling 




§0449 


STA 


KKDLD,PCR The next repent 


01470 


LDX 


1*152 Start of key data 


00471 RP3 


LDA 


,X Check one row 


00472 


ORA 


♦REPRES Sake all keys see* to 


00473 


STA 


,X+ Have been re-pressed 


S0474 


CBP1 


«15A Mas that the last ro«? 


#0475 


BNE 


RP3 Loop back if not 


00474 EXIT 


RTI 


Return fros interrupt 


00477 t 




0047B ♦ 







00479 *Counters for repeating keys 
004B0 KCLEAR FCB 0 

00481 KHQLD FCB 0 

00482 * 

01483 » 

00484 *!he key repeat routine is an adaptation 

00485 *of a progras by Charles Roslund which 
00484 Appeared in the Sept. 19B2 RAINBOW. 
00487 * 

00498 » 

004B9 END START 



Listing 2: 

1 'Utility to transfer EDTASM+ 

2 'text files from tape to disk 

3 CLS 

4 PRINT"EDTASM+ SOURCE CODE" 

5 PR I NT " F I LE TRANSFER UTILITY" 

6 PRINT STRING* (32, "-"> 

7 CLEAR500, 16308: DEFUSRO-16310 

8 FOR X*16310 TO 16318 

9 READ YlPOKE X,Y 

10 NEXT X 

11 DATA 173,159,160,4 

12 DATA 173,159, 160,6 

13 DATA 57 

14 PRINT"ENTER THE NAME OF THE" 

15 L I NEI NPUT" TAPE FILE: "|I* 

16 PRINT 

17 PR I NT "ENTER THE NAME OF THE" 

18 L I NE I NF UT " D I SK FILE: ";0* 

19 AUDIO ON: OPEN" I " , #-1 , I* 

20 OPEN " 0 " , # 1 , 0* : GOTO 22 

21 X=USR(0> J MOTOR OFF 

22 IF PEEK<129>>« THEN 29 

23 IF PEEK ( 124) =255 THEN 30 

24 X*=CHR*(0> J X=VARPTR{X*) : 

25 POKE X, PEEK (125) 

26 POKE X+2,1:P0KE X+3,218 

27 PRINT X*j !PRINT#1,X*; 

28 GOTO 21 

29 PRINT"?IO ERROR" : GOTO 31 

30 PRINT" TRANSFER COMPLETE" 

31 CLOSE: END 
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REVIEW/TUTORIAL 



16K 




This Peripheral Acquaintance 

Is A 
Real PAL 



By PaulS. Hoffman 



There's a new piece of hardware on the block, a real 
PAL for your TRS-80 Color or TDP-100 computer. 
The new addition from Tandy Towers in Fort Worth 
is the Color Computer Multi-Pak Interface (CCM1). It's a 
PAL in several ways. For one, it'll allow you to switch 
between four different Program-Pak cartridges without 
turning off the computer; for another, you can select a slot 
either through hardware (a f our-position switch on the front 
panel) or software (four different POKEs to a single 
memory location); another reason to call CCM1 a PAL is 
that it contains a chip called a PAL ("Programmable Array 
Logic"device#PAL 1414, a "semi-custom 1C which may be 
programmed for specific functions" — quote from the 
CCMI Service Manual). 

The unit plugs into the cartridge slot on the right side of 
the computer, and passesall the signals in parallel to all four 
slots, except for CCS (Cartridge Select Signal) and SCS 
(Spare Chip Select). These two signals are routed through 
the select latch, hardware switch and PAL to determine 
which slot will be operational. Power is provided through a 
separate cord — one more socket needed in the computer 
corner! — and, again, we can't tell by a quick look whether 
the baby is on or off! No power on/ off indicator light, I'm 
sorry to say. The recommended power-up procedure is to 
turn on all peripherals (certainly the Multi-Pak Interface) 
before turning on the computer. When powering down, turn 
the computer off first, then all peripheral devices. 

Certainly a major advantage to having a device such as 
this is the ability to have a Disk Controller permanently 
attached, not needing to constantly "pull the plug" on it to 
use a ROM Pak or the X-Pad. (I can't tell you how many 
times I've had a disk crash due to a faulty connection!) But it 
gives you a bit more flexibility than that, sinee you have four 
slots available. With the flip of a switch, 1 ean have: 

SLOT 4: Disk BASIC with X-Pad (Disk Controller 
plugged in here) 



SLOT 3: Extended BASIC with X-Pad (X-Pad plugged in 
here) 

SLOT 2: Micropainter 

SLOT I: Anything else — maybe Poltergeist for those 
breaks between work sessions. 

Tandy suggests that the Disk Controller (if you have it) go 
in slot 4 (toward the rear of the Interface). 1 suspect that this 
is simply because of the controller's size — it would be quite 
awkward to reach around it to plug or unplug another Pak. 
The same thing goes, as far as I'm concerned, with the X-Pad 
Controller, which is the same size. Put bigger cartridges in 
back, smaller in front. 

Notice that in the configuration I listed above, the X-Pad 
works both in Disk BASIC and in the slot it's plugged into. It 
actually f unctions regardless of which slot has been selected, 
because it doesn't depend on the two select lines used to pick 
a slot, and functions in a specially allocated area of memory. 
At this date, this is the only peripheral sold by Tandy which 
functions like this. Similar items would be real-time clock 
ROM Packs currently offered by other companies. 

After some experimentation, I've cataloged four major 
potential uses for the Multi-Pak Interface: 

1 ) Switching to and f rom Extended BASIC, Disk basic and 
ROM Cartridges. 

2) Copying ROM Cartridges to RAM or tape for study/ 
modification. 

3) Saving Graphic screens from graphically oriented ROM 
carts or games. 

4) Operating fully-decoded "spceial I/O" devices (such as 
X-Pad) simultaneously with Disk. 

The software POKE for selecting a slot is to location 
65407 (SFF7F). 

for slot 1 
for slot 2 
for slot 3 
for slot 4 



POKE 65407,0 
POKE 65407,17 
POKE 65407,34 
POKE 65407,51 
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If you look at how those numbers are represented in hex 
($00, $11, $22, S33), you'll see that the high-order nybble 
(bits 4 through 7) duplicates the low-order nybble (bits 0 
through 3). This is beeause the CCMI uses bits 0 and I to 
determine which slot gets the CTS signal, and bits 4 and 5 to 
route the SCS signal. Both signals have to go to the same slot 
for proper selection. The actual address used for this selec- 
tion process (65407) is determined by the programming of 
the PAL chip. There seems to have heen a la*t-minute 
change in that programming, because the Owner's Manual 
for the Interface lists the address as 65439 (SFF9F). An 
addenda sheet corrects the address. The strange thingabout 
it is the most of the time 65439 seems to f unctionexactly t he 
same as 65407 — writing to it will change the slot, and 65407 
will mirror the change. Also, readingeither location can tell 
you which slot has bwn selected by theswitch. If you haven't 
done a software POKE, the address will contain 204 ($CC), 
221 ($DD), 238 ($EE) or 255 ($FF) for slots 1, 2, 3 or 4. 1 n 
other words, the front panel switch fills i n bits 2,3,6 and 7 as 
well as creating the proper bit-pattern in 0, 1,4 and 5. 

1 n general, the hardware switch is the easiest way t o switch 
slots, but frequently it is necessary to press the RESET 
button on the computer to start a program. Some programs 
(such as Disk BASIC and the new Deluxe RS-232C Program- 
Pak) donl automatically send the computer a C ARTsignal 
and need to be nudged with "EXEC &HC000." 

Software selection (by doing the POKE to 65407) over- 
rides the switch. Once you've done a POKE, you can slide 
the switch back and forth at will, to no effect. RESF.T will 
return control to the switch (unless programming has 
altered the reset vector). 

To look at (for the purpose of study or modification) the 
program in a ROM Pak, put the cartridge in one slot 
(WHILE THF. COMPUTER AND CCMI ARE OFF), 
then place the switch in position to select an empty slot 
(Extended BASIC). After turning the CCMI on and then the 
computer, do the ROM Pak disable POKE (POKE 
&hff23,36). Then software-select the ROM Pak by POKE- 
ing the appropriate value into 65407. At this point, the 
ROM Pak program ean be awessed starting at address 
$C000. If you have a RAM-based monitor program or 
disassembler, you can now load into the computer and 
examine/disassemble the addresses above $C0i0. If you 
have 32K or better, you can move the program down in 
memory t o a n unused area of R A M , and then save i 1 1* tape 
for further study or modification. 

This is certainly the safest, best way to examine ROM' 
based programs, since it does not involve plugging ROM 
Paks in while the computer is on. (While testing what the 
CCMI will and won't do, I stupidly unplugged the X-Pad 

with power on and zapped my 6809 CPU I also had the 

Disk attached to the same slot through a Y-connectorand 
managed to zap the Bisk ROM. DONT PLUG OR 
UNPLUG ANY CARTRIDGE WITH THE POWER 
ON!) 

The matter of exploring graphics created by ROM Pak 
programs can be quite interesting. If you play a ROM Pak 
game or use a graphically oriented ROM Pak program 
(Logo, Micropainter, Art Gallery, Graphic Pak, etc.), you 
can switch out of the program into an empty slot (using the 
front-panel switeh) and the graphics will be retained in 
memory. If youdo alotofgraphic programming, you might 
already have been able to identify the mode used in the 
ROM Pak you've selected. Chanees are itll be either 



P MODE 4, PMO»E3 or P MODE I. A simple program 
like Listing 1 will display part of the computer's graphics 
memory and help you find where the ROM Pak has stored 
its pictures. The program will run continuously, showing 
you various sections of Extended BASIC'S graphics memory. 
When you see what looks like the right graphic configura- 
tion, press any key. The computer will print on the screen all 
the pertinent information. If you have a screen print pro- 
gram, you could dump the picture to a printer, or you can 
save the picture to tape by using the indicated starting and 
ending addresses in a CSA VEM command. 

CSA VEM "TITLE, "start address, end address.4I3 (413 
contains a decimal 57 — "return from subroutine" code — so 
that if you accidentally try to EXEC a saved picture as 
though it were a machine language program, the execute 
address — 413 — will return the computer to where it was 
without crashing). 

Many ROM Paks will have their graphics area offset 
slightly from Extended BASIC'S. In these cases, you might 
have to do a "block move" of the memory forward or 
backward to coincide with one of Extended BASIC'S graphic 
pages. For example. Art Gallery pictures end up being in 
PMODE I, but they start ke/mre page I . In fact, they start at 
$400, the beginning of the text scr#en. The program in 
Listing 2 will move the picture down on the screen, but you 
wilt not be able to recover the top 5 1 2 bytes (the text screen 
has clobbered them). 

Since Extended BASIC'S "pages"are 1 536 bytes long, you 
might not get a graphiefromaROM Pak to line up properly 
with the start of a page. While running I .isting I , look for the 
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most complete picture, then press any key. If the picture was 
too high on the screen, key in and run Listing 3. If thepicture 
is still too high, press BREAK and then RUN it again. 

If the picture is too low on the screen, type in and RUN 
Listing 4, repeating as many times as necessary. 

All of this business of looking at, moving and copying 
graphic screens leads naturally into the subject of using the 
Multi-Pak Interface to link the X-Pad with Disk. An 
addendum to the CCM1 Owner's Manual says, "Graphic 
displays created while using the X-Pad . . . can be saved on 
disk . . . Read the three corresponding values per the X-Pad 
manual to load the display. Once completed, the finished 
display can be saved using the SAVEM command." The 
middlcscntcnccof what I've quoted is absolute nonsense— I 
suppose the reference is to the three addresses the X-Pad 
uses f or X coordinate, Ycoordinate and penstatus — and the 
last sentence, while correct, leaves much to be said. Both the 
SA VEMand the CSA VE A/command need three addresses 
as parameters: start address, end address and execute 
address. The X-Pad manual, unf ortunately, gives an abso- 
lute value for the start of graphics memory ($600) and 
calculates addresses from that. The problem is that Disk 
BASIC reorganizes the graphics area, putting it initially 2K 
higher in memory (starting at SEOO). It also couldget shoved 
even higher if you've used the FILES command to allocate 
moredisk buffer space. Goodness knows where the start of 
graphics could end up! So how d o you find out where it is? 
The same way Disk BASIC does: You look at the pointers to 
graphics memory that basic sets up. 

SBA = start of current graphics page 

SB7 = 1 byte past end of current graphics page 

$BC = start of graphics memory 
This means that the format for saving to disk should be: 

SAVEM "TITLE",PEEK(&KBA)*256> PEEK(&UB7) 

•256-1,413 

A picture saved f rom Extended basic (using CSA VEM) 
will most likely (if it is started on graphics page I } be coded 
to load back in starting at S600. If you try to load this picture 
in while Disk BASIC is operational, it wil] write over Disk 
basics I/O buffers and only be partially visible on the 
screen (or not at all if it was in a low-resolution mode). Such 
a picture must be OFFSET LOADED. The format for the 
command is: 

CLOA DM "TITLE", PEEK(&UBC)*25i-&W 
The formula after the comma is there to calculate the 
number of bytes of offset (subtracting the original starting 
address f rom the new starting address to get the difference), 

On the other hand, pictures saved to tape while running 
Disk BASIC will need f he of f set loaded in a diff erent way i f 
you want to use them without the disk. Their addresses are 
too high (normally by 2K bytes), and the offset has to 
"wrap-around" the top of memory. The correct format for 
loading such a picture from tape is: 

CLOADM "TITLE", &HC100 

To summarize, the CCM1 is a fine buy for the price 
(SI 19. 95). It has the additional advantage of buffering all of 
the R#M port connections, leaving your SAM and CPU a 
bit more protected (though that didn't keep my stupidity 
from destroying a CPU). Possible disadvantages are that the 
buffering chips (74LS367s) and the PAL chip are highly 
susceptible todamage f rom static electricity. Just make sure 
you follow the rules of good computer maintenance, and 
youll enjoy additional flexibility — and fewer disk crashes 
due to poor contact! 



Listing 1: 

3 8OTO170 

10 FORM«0TO4: 'MODE # 
20 F0RP-1T05: 'PAGE # 
30 FORS-0TO1: 'SCREEN COLOR SET 

40 pmodem,p:screeni»s 
30 forx-0to100i 'delay 

60 I F I NKEY*< >" " THEN 1 20 : " LOOK FOR 

KEYPRESS 
70 NEXTX 

80 NEXTS: ' NEXT COLORSET 

90 NEXTP; * NEXT PABE 

100 NEXTM! * NEXT MODE 

110 BOTO10S 'REPEAT 

120 CLS:PRINT"PMODE"?M? ", PAGE " % 

P 

123 PRINT" SCREEN i,"?S 

130 PR I NT "SCREEN STARTS AT 8tH"*H 

EX*<PEEK<WHBA>#236> 

140 PR I NT "SCREEN ENDS AT &H"?HEX 

* (PEEK (&HB7) #256-1 ) 

150 END 

170 PCLEAR8:6OTO10 

Listing 2; 

5 PMODE1, l: SCREEN 1,0 

10 FORM-&HFFF TO&H600 STEP-1 

20 POKE M+S<H200,PEEK<M> 

30 NEXTM 

40 F0RM-&H7FF TO&H600 STEP-1 

50 POKEM,0:* PAINTS TOP PORTION S 

AME AS BORDER COLOR 

60 NEXTM 

70 GOTO70 

Listing 3: 

5 PMODEM,P: SCREEN 1,S: 'REPLACE TH 
E VARIABLES IN THIS LINE WITH TH 
E CORRECT MODE #, PAGE # AND COL 
ORSET # FOUND BY USING LISTING 1 
10 FORX«PEEK<ScHB7> #236-1 TO PEEK 
<«cHBA>*236 STEP-1 
20 POKE X , PEEK ( X — 8tH200> 
30 NEXTX 
40 GOTO40 



Listing 4: 

5 PMODEM,P:SCREENl,S: 'REPLACE TH 
E VARIABLES IN THIS LINE WITH TH 
E CORRECT MODE # f PAGE # AND COL 
ORSET # FOUND BY USING LISTING 1 
10 F0RX-PEEK<S(HBA>#256 TO PEEMSc 
HB7) #256-1 

20 POKE X, PEEK (X+&H200) 
30 NEXTX 

40 BOTO40 _ 



82 RAINBOW September 1883 



EDUCATION OVERVIEW 



N etworkin G 

B ette R 
S o f twar E 

p/aluatioM 



By Michael Plog, Ph.D. 



One major problem with computer use in education 
(especially the Color Computer) is the lack of 
knowledge about quality software. 
Now, let's get it correct, 1 am not talking about the lack of 
existence of quality software, just the lack of knowledge 
about quality software. 

Software purchase is not a minor concern, especially for 
schools with severe hudget constraints. How do school peo- 
ple make decisions about purchasing software? Several 
ways. 

The first is blind faith, Armed with a limited checkbook, 
the b rave purchaser reads advertisements, looking for small 
details which might give a clue to the actual operation of a 
program. A selection is made, purchase order typed, signed 
through the bureaucratic structure, and in a few weeks, the 
product is delivered. Sometimes the selection is ideal; it fits 
the needs of the person ordering it. and works without a 
single prohlem. Sometimes, however, the selection is less 
than perfect. If it works, the stipulated definitions by the 
author are much different than the concepts used hy the 
person ordering it. Yes, there are snake oil salesmen out 
there, ready to take your money for a product that might be 
totally useless. 

The second way of ordering software— usually employed 
after a few negative encounters — is the informal sharing of 
experience. Other owners of the Color Computer are called; 
notices aregiven at club meetings. Sometimes theseeker gets 
lucky using this method, and someone is found who has 
already purchased the software in question. Now, the 

(Michael Piog received his Ph.D. degree from the 
University of Illinois, the M.S. frmm Memphis State 
University, and the B.S.from the University of Ten- 
nessee. For his foreign I research language option 
required for the doctorate, he naturally selected com- 
puter language. Michael currently works for the Illi- 
nois State Bmord *f Education as a research and eva- 
luation specialist.) 



informal sharing provides a single review, hut a t least hy a 
known source. Since theft is not uncommon among end- 
users of computers, some purchasers do not have to huy 
anything, hut obtain a copy of a program, often with inade- 
quate instructions. 

Occasionally, a third (far superior) method of software 
selection is used — the review. The potential purchaser gets a 
chance to look at the product, try it out, maybe even get a 
chance to spend enough time to work completely through 
tbe program. The problem with software review is that it is 
so limited. We can all do it at our local Radio Shack store, 
for the programs in stock. The problem is that this is a very 
small slice of available products for the Color Computer. 
Even if some of you are lucky enough to have a third party 
software dealer nearhy (I am not), selection is still limited. In 
addition, 1 have seen teachers and principals reviewing edu- 
cational software, but I have never seen a teacher bring in 
students to sit at the keyhoard and try the products. 

All three of these selection methods— reviews, informal 
experience sharing, and hlind faith — can work well and will 
continue to be part of the h uman decision process. There is 
another way, however, I am recommending the creation of a 
national network for educational software evaluation to be 
conducted via the Rainbow. It is only coincidence that this 
notion is given birth with an issue devoted to education. This 
coincidence may be a good omen for the success of the 
project. 

Say the words aloud once or twice: a national network f or 
educational software evaluation. No cute acronym for the 
project, but a sincere request for cooperation from readers 
of the Rainbow. 

Please notice the evaluation form. Simply put, the idea is 
for any of you (hopefully, many of you) to complete the 
form on educational software you have. Completed forms 
will be collected at a central location, and periodically, 
results will he provided in the Rainbow, Then, the fourth 
method of software selection (the national evaluation) can 
be added to the other three methods. 
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Name of Software: . 
Marketed From: — 



EDUCATIONAL SOFTWARE 
EVALUATION FORM 
for the COLOR COMPUTER 



Minimum System Needed: Supplied on; Written in: 

Amount of RAM ROM Pack BASIC 

Number of Disk Drives Tape ML 

Color Set Needed Y N Diskette Other _ 

Printer Y N 

Joysticks Y N 



Purpose (check all that apply) 

□ Interactive Instruction 

□ Teaching About Computers 

□ Creation of Materials 

□ Management of Instruction 

□ Administrative Management of Information 

□ Data Exchange 

□ Other 



Subject Matter (check all that apply) 

□ Computer Learning 

□ Foreign Language 

□ Game/Simulation 

□ Language Arts 

□ Math 

□ Science 

□ Social Studies 

□ Other 



Circle All Most Appropriate Classes f«r use of Software. 
Pre-School Kl 23456789 10 11 12 Adult 



Rate the Software on each of the following items, 
(**!"= poorest; "5" - best; "N/A" = Not Applicable) 



Very 
Poor 



Very 
Good 



How Easy to Operate 


N/A 


2 


3 


4 


5 


Use of Color 


N/A 


2 


3 


4 


5 


Use of Graphics 


N/A 


2 


3 


4 


5 


Clarity of Instructions 


N/A 


2 


3 


4 


5 


Completeness of 












Instructions 


N/A 


2 


3 


4 


5 


How Well Does It do the 












Job It is Supposed To 


N/A 


2 


3 


4 


5 


Interest Level for 












Appropriate Classes 


N/A 


2 


3 


4 


5 



Major Strengths: 



Major Weaknesses: 



Your Overall Grade For This Software; 
A B C D F 



Your relationship to schools: 

□ Student □ Parent 

□ Teacher □ Other 

□ Administrator □ Private Citizen 

(Signature/ Address) 



Mail Completed Form To: 

Michael Plog, Ph.D., 829 Evergreen, Chatham, 1L 62629 
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Think of the advantage of this national evaluation 
method for people trying to buy educational software. 
Instead of one or two reviews for educational software, 
many can beavailable. Instead oftryingto outguess a devel- 
oper's definition of "screen controlled directions easily 
understood by a first grade student," actual experiences can 
be examined. For the isolated Color Computer user (and 1 
imagine most of us are), knowledge of people from all parts 
of the country, and possibly other countries. 

1 do not want to spend too much time on the benefits of 
such a system. Let's look for a minute at what evaluation 
means in this context. An evaluation is a description and 
judgment of a particular software package. Without the 
judgment, there is no evaluation. (Evaluation's middle name 
is "value.") Take a look at the evaluation form. 

First, the description of the software package. We have to 
identify what software is being evaluated, thus the blanks for 
the name and who markets the package, as well as other 
items such as price, necessary system, and how supplied. 

Notice the portion of the form called "Purpose." These 
arc categories, of uses of programs. For a more complete 
explanation of each, dig out your last month's Rainbow and 
check out the article there. 1 n order to get a full description 
of the software, we need to know the purpose. Logo, for 
example, would have the purpose of "Interactive Instruc- 
tion" and "Teaching About Computers"; students operate 
the keyboard and command the computer to do certain 
thing*. A word processing paekage, as another example, 
eould be used for" Administrative Management of Informa- 
tion," or even for"lnteractive Instruction" in a typing class. 
A file management package would most probably have the 
purpose of "Management of Instruction" (to keep grades, 
test records, etc.). A program creating a word search would 
be "Creation of Materials." You get the idea, right? 

The portion of the form titled "Subject Matter" needs 
little explanation. You may not want to check any of these, 
depending on the purpose of the software. For example, 
"Creation of Materials" could be for any subject matter. 
Likewise, "Administrative Management of Information" 
might not be related to any single subject matter. Jf the 
software is related to a particular subject matter, please note 
it. 

Tocomplete our description of the software (and to start 
reporting your judgments about the package), supply your 
best estimate for theappropriaie classes to use the software. 
For a word processing package, you might walit to circle 7 
through adult, or even start with a lower age/class. 

The other items on the form ask f ory our j udgmentsabout 
the software. Rate the software on the seven criteria listed. 
We are asking for your judgments; do not be afraid to be 
honest here. This is an evaluation of educational software, 
sm we want you tn "grade" the package. 

Finally, identify your relationship to schools. Perspec- 
tives of different groups may vary, which is valuable infor- 
mation to potential buyers. 

So much fort he description and judgment of the national 
network. Now for the network part. The network, dear 
reader, means ymu! This idea will not work unless you 
complete and mail in those forms. I will collect the forms 
and provide an analysis after a substantial number come to 
me. (The analysis, naturally, will be conducted using my 



Color Computer.) The data will be entered and stored using 
a File System, and the analysis provided with a BASIC 
program. 

Please mail your completed form to: Michael Plog, S29 
Evergreen, Chatham, 111., 62629. Unfortunately, I cannot 
provide a reward for completed forms, not even the stamps 
necessary to mail the information to me. We will have to rely 
on your interest and involvement as a concerned Color 
Computer user. 1 happen to think most of you readers are 
interested and involved. 

One other note. I do not know how many times we will 
print the evaluation form in the Rainbow, so please make 
copies of the form. Feel free to make as many copies as you 
wish. I do not like to destroy my magazines (I save all my 
Rainbows, don't you?), so I highly encourage making 
copies. In fact, if you want to pass out the form to school 
people, feel fr#e to make several copies. 

By way of a final remark and quick update, Radio Shack 
has completed an agreement with the Minnesota Educa- 
tional Computing Consortium (MECC) to convert selected 
programs from the MECC educational courseware library 
to the Model III and Color Computer. Some of you may 
know about MECC; they have a national reputation for 
leadership in educational software. We look forwared to the 
results of this agreement. 

Until next month, think evaluation — think education! 



DCSCRTPRCSS, INC. 

P. O.Sox 151 28 
Las Vegas, Nevada 891 1 4 



COMPUTER 
BUSINCSS FOAMS 

Continuous forms, labels, paper, checks, 
invoices, statements— all uuith your 
imprint. Continuous letterhead with a 
perf so fine that you need a magnifying 
glass ta tell It's a fan fold sheet. 
Matching envelopes. 

Regular letterhead, business forms and 
cards also. 

Send sample for quote. Send $3.00 
(refundable on first order) for our 
catalog. 

Catalog also includes computer 
furniture. 



September 1963 the RAINBOW 87 



Drawinq 
On This olackboard 
Chaks Up 

Programming Ease. 

By Joseph Koiar 
Rainbow Contribu+ing Edi+or 



GRAPHICS 



"This is such a simple 
program that even the 
person not too familiar or 
enthusiastic about pro- 
gramming could use it to 
create his/her own dis- 
plays. " 



The object here is to allow anybody, within the constraints 
of this program, to create their own programs. It appears 
to have some benefit when used as a blackboard for 
individualized instruction. There is no need to get into the arcane 
depths of computing to produce creditable results. It allows a 
person to create a display that they visualize in their mind's eye 
without the attention to programming conventions that are 
usually required. It is unencumbered with excess impedimenta 
and elegant touches. In a word, it is simple. 

The program is for use on the hi-res screen of the 16K ECB 
Color Computer. All variablesare double letters. The first letter 
is the code f or the option and the second letter is the name of the 
letter or number called. 

A Code — Capital letters and numerals of the script alphabet. 

B Code — Small letters of script. 

C Code — Alternate small script letters, (optional) 

K Code — Upper case and numerals of the print alphabet. 

N Code — Lower case of the print alphabet. 

Varied Codes — Spacers and punctuation marks. 

Both alphabets may be used on the screen at the same time. A 
maximum of 20 printed letters and 25 script letters fill an entire 
row, provided you use "S8" size option, in the DRA W state- 
ment. S8 is recommended; S12 is good and S4 may be used, but 
not recommended. 
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Nine rows will fit comfortably on the screen, providing 
you use S8, begin at a vertical coordinate of 20 and incre- 
ment +20 for each row to provide adequate spacing. On the 
horizontal, if indenting, use 15 or 20, otherwise, 5 leaves 
plenty of space at the left margin. 

The DRA If command is used in every program line, If 
size is not changed during the program, it need only be put 
into the initial DRA ^statement. The first line would begin: 
DRAW"S>$BM 15,20." 

To concatenate the name"Joe"in print, you would add to 
theabove£)/M^line:+KJ5+NOS+NES.Thismeansconcaten- 
ate (+), capital printed letter, (K.), name of lctter,(Jl, concat- 
enate, (+), small printed letter, (N), name of letter, (•), 
concatenate. (+), small printed letter, (N), name of letter, 
(E), 

Due to the large overhead, only three screen pages of 
print/text are possible. The two sets of numeralsare some- 
what similar and one set could be deleted to conserve 
memory. If 1 remember correctly, some of the punctuation 
marks are duplicated. A few could be deleted. The spacer 
works well with any option. 

This is sueh a simple program that even the person not too 
familiaror enthusiastic about programmingcould use it to 
create his/her own displays. Concatenation serves the bill 
very nicely. The program lines, beginningat line 2000 would 
consistentirely of DRA IV statements, except for the last line 
on each display page. The variables are so coded that the 
programmer can easily follow and locate his position when 
looking at the listing. All she/ he has t odo is read the second 
letter of the variable. Reading the second letters will indicate 
exactly what is being written or printed to the screen. Thus, 
it is easy to locate and correct a mistake. In the interest of 

COLOR 

COMPUTER 

• Members enjoy a 30 - 40% savings on software! 

• More being added monthlyl 

• Hardware & accessories at substantial savings! 

• Monthly specials and reviews! 

• Special orders service for members! 

• No service charge for VISA or MCl 

• Your savings can far exceed your dues! 

Join Today And Start Saving! 



I Dues are S2Z.59 - We accept 
t' Personal Checks, M.O, or Charge It! 




NAME 

ADDRESS 

CITY ... STATE ZIP 

□ VISA □ MG Exp. Date # 

Mail to: 

Color Computer Buyers Club 

P.O. Box 241 

Eaton Haptds, Ml 48827 



saving memory CLE A R 450 is good, so f ar, but CLEAR 500 
appears to be good all the time. 

When RUN, the program will display the first page. To 
proceed to the next page, press the G key. Do the same to get 
to the third page. Another press of the G key and it will 
recycle to the first page. It may be held at the end of the third 
page in an infinite loop. 

Everything is printed or written via concatenation. Begin 
a new program line after two lines of concatenated variables 
are added to the DRA W statement. (Sixty-four spaces or 
two rows on the screen.) Much more than that willget an LS 



"Everything is printed or written via 
concatenation. Begin a new program 
line after two lines of concatenated 
variables are added to the DRAW 
statement. " 



error message. It is better to be reasonable and not try to 
cram as many variables into a program line as possible. You 
will onlyhaveto backtrack and lop off a few variables and 
start a new program line anyway. 

Reaching the end of a row, (right-hand margin) requires^ 
new program line. The "follower" line must begin with 
DRA Wand the next variable need not have+ pref ixed, but 
all the following concatenated variables must have the + in 
front of the variable. 

There is a third case when you are likely to need an 
additional DRA W program line. When creating two 
columns of text on the same screen line, it is easier and 
neater to use a new DRA statement with the coordinates 
to locate thef irst letter of the second column. If alignment is 
not necessary, youcan insert + M BRN" where N is a number, 
to move over N spaces to the right. Try any number, N, 
check it out and adjust left o r right by increasing o r decreas- 
ing N. Then continue to concatenate. 

Briefly, to use this program, delete lines 2000-2999. 
Locate and size the starting program line at 2000 inside the 
quote marks of a DRAW statement. Then concatenate 
about 10 variables, not forgetting any spacer variables, 
RUNh and see how it looks. Then, begin a new program line 
with DRA W. No quote marks! Continue to concatenate. If 
you concatenate about 10 more variables, you will be 
approaching the right-hand margin. Check it out to make 
sureyou don't run of f the screen. Reposition the seeond row 
using the same system as line 2000. Make sure you increment 
the vertical by +20 to insure adequate spacing between rows. 

If you use 20 as an increment, you can easily locate a 
program line by counting by 20s and check the DRA W 
statement in the listing that has a vertical element the same 
as the one you just counted out. It is also a good idea to 
increment eaeh second and possible third program line in 
the same row, by an odd number. This gives a good clue as 
the program's lines will indicate if it is a "starter," 2000, 
2010, even number or a "follower" line, 2005, 2007, 2015, 
2017, odd numbens. 

At the end of the last BRA W program line on a screen 
display page, add ;GOSUB 3020. This will hold the display 
until you are ready to ptoceed. Press the G key. 
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When you get to the very last line in your program (20#0 
block)you have the choice of hold ing the last screen display 
or returning to the starting page, 

If you want to hold at the last screen display, at the end of 
your final line, add .'GO7'O30l0, If you want to return to the 
first page, add ;GOSUB 3020. Then pr*ss the G key. 

That's it! Pretty easy, huh? 

After using this system a few times, it is almost a joy, and 
certainly satisf ying to key in any desired inf ormation. There 
is so little to remember. Since the variables are coded, prac- 
tically the entire system can be committed to memory. Feel 
free to redesignate the variables that govern the punctuation 
marks and spacers to suit yourself. For that matter, you can 
change the code letters, if you prefer some other codes. 

Note that the C coded letters should be examined and if 
not desired, deleted f rom the program to save memory. The 
Bcoded letters begin at the base line and the C coded letters 
begin at the top of the small letters, Key in DRAW 
"S8BM100,«0"+CO$+CN$+BO$+BN$ andjsee the differ- 
ence. 



R2" 

60 AD*" 



1 BU4BRD4LURFR2EU3HL3BBD4B 




The listing: 

10 CLEAR 450 
20 PMQDE4»i:PCLS:BCRE£fT 
30 A A*" "BRNR2HU3ER2FNUD3N6FBR ■ 
40 AB*-"BRNR2HNOU3NHER2F8NL3FDBB 

R2" 

30 AC*-"BU5F2M+3 P -1HL2G2D2FR3NEB 



SOME OF THE PROGRAMS THAT MADE Mr. R«e THE SOFTWARE 
LEADER FOR THE IM-l/IM-2 ARE NOW AVAILABLE FOR THE 
C»LOR COMPUTER, 16K, EXT BASIC. PROGRAMS LIKE /»» 



MURDER 



E ITER -id h b 1 AND ?INI V - I 

5C3S MCDERMITT . CATCH THE CAT & E LAY THE K:LLE3 F Y0U 

t- 1 ALL I NT _ "I 

A CHALLENGING, REALISTIC WHO DONE IT ??? It. 95 

FOR EDUCATION TRY 



JAIL 



AN EXCELLENT TOOL TO ENHANCE SPELLING ABILITY, FOR 
ALL AGES. SOT A ' HANGMAN* TYPE PROGRAM, BUT A USER 
C3,-u'.-:o:,L£j, 2 program tape. 

1. ;?£ATE YOUR. OWN W»RD LIST (YOU CONTROL THE 
DKGi'FF OF DlFlCULTY AND AGE LEVt?L>. 

2 . JAIL - XOUR LIST IS READ INTO THE PROGRAM & 
THE FUNAEAKNING BEGINS. ONE OR TWO PLATERS 
COMPETE IN A 3PEI1ING OR PHRASE CONTEST AND 
THE LOSER GtES T» JAIL, 16. J5 

(CREATE TAPES OF VARYING DIFICULTY FOB EACH GRADE) 



X 



2FER 



1. GONDOLA - PILOT YOUR BALL»0N OVER THE MOUNTAIN 
& LAND SAFELY AMONGST THE TREES. WIND, GRAVITY 
4 Mi 'I P IATURE ARE FAC'i S T( N * i ' THIS 
ONE LOOKS EASY, TRY IT' ? 

py >i »■'/ ;h the z i ,nrdR in this simon 

TYPE GAME, IF YOU CAN. 2FER 9.95 

ALL PR*GRA!H5 ON CASSETT / WE PAY THE POSTAGE 
COD (ADD $2} Mr, R's 

COD or HONEY ORDER 68 KELLY ROAD 

7CR 26 HCOR SF^VIC3 SC WINDSOR CT 

TEL 2*3-6^-161? G6*?4 



70 AE*-"BRNR2HUEM*HER2FNEBD30BR2 

60 AF*-"BU2NF2NRBU2ER3NRQDNLNRD2 

90 AQ*-"BU5FR4HL2Q2D2FR3EUL2BD2B 
R3" 

100 AH*- ,, EU2NR3UHBR3GD3FBR2 M 
110 A I " BUURBD2NHE3UHGD2F2RQR" 
120 AJ*-"BUNEFREU4LNBR2BD3" 
130 AK»-"EU3HBR5S3LBURF2DRBR" 
140 AL *- " BU2R2E2ULQD33LBR2R2EBRB 
D M 

150 AMt- " BU5FND4EFND4EFD3FBR" 
160 AN»-*'BU3FND4ERFD3FBR" 
170 AO*- " BRMU3ER2FNED3QNL2BR2 " 
1 60 APt- " EU2UNHNUER2FDBL2HBD3BR4 

1 90 AQ*- " BRNR2HU3ER2FD3QUHBD2BRD 
FBU2BR" 

200 AR*» "EU3NHER2FDQL3EF3BR" 
210 AB*« " E4UHGDF3DL3H2BR6BD2 " 
220 AT*- M BU3FER2NRBD38LHURBD2BR4 

230 AU#" "BU4ED4FRENU4FBR" 
240 AV*-"BUSFD3FREU3EBRBD3" 
230 AW«-"BU3FD3FENU4FEU3EBD5" 
260 AX*- ,, BUSRF2DF2BU5GSBR6" 
270 AY*-" BU4ED2FRND2REU2BD3BR 11 
280 A Z * ■ " BU3FER2FQLQ2FREFBR " 
290 B A*- " RU2ERFDNF6LHBDBR4 " 
300 BB*- ,, RE2U3H8D4RFREUNLRBD2" 
310 BC*""RU2ERFBD2L2HBDBR3" 
320 CC»» M BRBU3FER2BL3BDDFREF M 
330 BD*-"RU2ERFDQLHBR3U4HQDFBDBF 
F" 

340 CD*-"BU3FERBQ2NUFREU4HQDF2DF 

350 BE*-"RE2HGF2R" 

360 CE*-"BU3F2R2EHLQF2R" 

370 BF*-"RE3UHQD6FEUHNLEBD" 

380 BB»-"ENFUERFDBLHBR3D3BHE3BD" 

390 CB»-"BU3R2NR8DFREUNHD4QHE3BD 



400 BH»" 
410 CHf 
420 BI*i 
430 CI*" 
440 BJ*- 
450 BK»- 
R" 

460 BL*» 
470 CL*- 
480 BM*- 
490 CM*« 
500 BN»- 
510 CN*» 
320 BO*=» 



" RE3UHQD3NDBEFDR " 
" BRBU3F0EUHQD2ND3EFD3R" 
" REU2BUN0BD3DRBR" 
" BU3FREBUNEBDD3RBR" 



"RE3UHBD4BUBER2DL2NUFR2B 

" BRRE2U3HQD4F R H 

" BU3F2EU3HBD4FR2 " 

" RENDUNUEFND2EFD2R" 

•BU3FND2EFND2EFD2R" 

"RENDUNUEFD2R" 

* BU3FND2NUERD3R" 

'BEUERFDBLHBDBR4" 
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530 C0*-"BEUERNR3FDQLHBDBR4" 

340 BP*-"EUERFDGLHD4BU3BR3" 

SS0 CP*" "BRBU3FND4ERFDGLHBDBR2RB 

R- 

560 BQ*-" BEUERFDGLHBDBR2D2FEUHNL 
RBDBU" 

S70 BR*" "REU2FRD2R " 

380 CR*-"BU2EFRD2R" 

390 B8*-"REU2F20NHR2 ,a 

600 BT*-"REU3NL2NR2NUBD3FR" 

610 CT*» M REU2NL2NR2NU2BD2FR " 

620 BU*-"RENU2FENU2F" 

630 CU*-»BENU2NDFENU2NDF" 

640 BV*-"RENU2FEU2RBD3" 

630 CV*-"BU3RD2FEU2RBD3" 

660 BW*-*RENU2FENU2FEU2RBD3" 

670 CN*-"BRBUNU2FENU2FEU2RBD3" 

6B0 BX*-"RE3BL3F3" 

690 BY*- "RENU2FENU2D30HE3BD " 

700 BZ*— " BUBRUERFD8LBRD2BHE2R " 

710 OM*-" 8R2BUDGBEBR2 " ' COMMA 

720 QU*-"BU3BRUERFDBBDDBR2 M '? MA 

RK 

730 DT*-"BRRBR2" ' PERIOD 

740 OC*— "BU4BR2DBDDBR2BD" * COLON 

730 9S*-"BR3»" SPACE 

760 XC*-"BU3BR2D2BD2DBR2«" « 

770 HP*- , 'BE2R2BRBD2 , »* HYPHEN 

7B0 UP*- " BU3BR2D2BDBF2 " ■ APOSTROP 

HE 

790 QT*»" BU3BR2D2BRU2BD3BR2 " ' QUO 
TE 

600 A0*-"BRHU3ER2FD3ONL2BR3 M 
810 A1*--BU4BR2ED3BR2" 
820 A2*-"BU4ER2FDGL3D2R4BR2 ,, 
830 A3*"' 1 BU4ER2FGNL2FDQL2NHBR6 " 
840 A4*- M BR3U383R4BD2BR3" 
BS0 A3*-" BU3NR4D2R3FDGNL3BR4" 
B60 A6*- n BU3BRNR38D3FR2EUHL2QBD2 
BR7" 

B70 A7*-"BU3R4D283BR6" 

BB0 AG*-" BRNR2HUEHER2FGNL2FD8BR4 

890 A9*- , 'R3EU3HL28DFR2EBF3" 

1 000 N A*— " BU4R3FDHL28DFR2ENU2FBR 

2" 

1010 NB*— " BU6RD6NLBUFR2EU2HL2GBF 

3BR3" 

1020 NC*— " BRNR2HU2ER2FBD2GBR 3 " 
1030 ND*— 1 1 BRNR2HU2ER2FD2NGDU6NLB 
D6NLBR3" 

1040 NE*- M BRHU2ER2FDL3BD2R2NEBR3 

1050 NF*» " BRU3NLNRU2ERFDBD4BR2 " 
1060 NQ*= "BRNR2HU2ER2FNUD2NGD26L 
2HBEBR3" 

1070 NH*-" NRBU6RD3ND3ER2FD3BR2" 
1080 N I •— " RNRU4LBURBD5BR3" 
1090 N J ** " BDFREU3LBURBD5BR2 " 
1100 NK*— " RU6NLBD4R2NKF2BR2" 




From the leading supplier ol Computer 
Grade Cassettes, new, longer length C-12's 
(6 minutes per side) provide the extra tew 
feet needed for some 16K programs. 
r^f> Premium 5-screw shell with leader 
^ —BASF tape 

Internationally acclaimed, 
^ Thousands of repeat users, 
<^ Error Free • Money back Guarantee 



500 C-12 s 380 each 

Shipping $17.00/500 

w/boxcs add 13« 





BASF Quallmetric Flexl-Diac -Lifetime Warranty. R. f 
5V«" Single Side. Double Density, Soft-Sectored. 

.NEW! MICRO CASSETTES lnconven»nt short lengths. 



MC-30 I box (fits Epson & Sbmp mmo irtvesf 

OP Call: 213/710-1430 ^SS^SSSST" ^ 
ORDER f\MA!L TO: ¥OR K lO" Computerwaf e 

NOW, . .1/74573 KIRridge St., #Bi,C3noga Park.CA 91307 
ORDER FORM ■ — — — — ■ 



SW>1* Cuddy g t SSi 



c « 6 tffS^ W 
i W lMMO G««C*d QVISA □ MASTEftCAfiO 
□ PUEASE S£MO QUANTITY DISCOUNTS 




_ State/Zip _ 



Computer make & model ._ 



_ Disk? (y/n) 
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1110 NL*- ,, BU6RD6M-RBR2" 

1 1 20 NW- "BU4FND3EFND3EFD3BR2 " 

1130 NN*-"BU4FND3ERFD3BR2 " 

1140 N0<" "BRHU2ER2FD28NL2BR3** 

1 130 NP*« " BU4FND2ER2FD2GL2HD3LBU 

2BR7" 

1160 NQ«- "BRNR2HU2ER2FNED2N6D3RB 
U2BR2* 

1170 NR " BRBU4FND3ERFBD3BR2 " 
1180 N9*- M BUFR2EHL2HER2FBD3BR2" 
1190 NT»- " BU4RNUNRD3FREBDBR3" 
1200 NU»-"BUNU3FR2ENU3FBR2" 
1210 NVt-"BU2NU2F2E2NU2BD2BR2" 
1220 NW»-"BUNU3FENU3FENU3BR2BD" 
1230 N X * ■ " E2NH2NE2F2BR 2 " 
1240 NY*-"BUNU3FR2ENU3D2BL2HBUBR 
6" 

1250 NZ*> M BU4R4G4R4BR2 ,> 

1260 B9«- ,, BR3" 

1270 XN«-"NUN6BR2" 

1280 DT*«"BR2R" 

1290 XC»«"UBUU3BD4BR2" 

1300 QM»-" BUSER2FD0LDBDDBR4" 

1310 K A*" " U9ER2FD3NL4D2BR3" 

1320 KB«-"U6R3FDBNL3FD8NL3BR5" 

1330 KC** ,, NRHU4ER2FBD4BNL2BR4" 

1340 KD*=" U6R3FD4BNL3BR4" 

13S0 KE«-"NR4U3NR3U3R4BD6BR3" 

1360 KF*» ,, U3NR3U3R4BD6BR3" 

1370 KB*»" BRHU4ER2FBD3NLDBNL2BR4 



1380 KH»- , 'U3NU3R4NU3D3BR3" 

1390 KI*-"NU6BR3" 

1400 KJ*-"BUNUFR2ENU3BDBR3" 

1410 KK*-" U3NU3R2E2UBD3BL2F2DBR3 

1420 KL*-"NU6R4BR3" 

1430 KM*-"U6F3E3D6BR3" 

1440 KN*-"USNUF4NU5DBR3 M 

1450 KQ*"" BRNR2HU4ER2FD4GBR4 " 

1460 KP»-" U6R3FD0NL3BF3BR " 

1470 KQ*-"BRHU4ER2FD4BLNUNDNLBR5 

14B0 MR»-"U6R3FDBL2NLF3BR3 M 
1490 KS*-"BUFR2EUHL2HUER2FBD5BR3 

1500 KT*-"BR2U6NL2R2BD6BR3 ,, 
1510 KU*» n BRHU5BR4D5BNL2BR5" 
1X0 KV*»"BR2H2U4BR4D4B2BR5" 
1 530 KM*-" BUNU3FE2F2ENU5BR3BD" 
1540 KX*-"UE2H2UBR4DB2F2DBR3" 
1550 KY*** ,, BR2U3H2UBR4DG2BF3BR2 ,, 
1560 KZ»-"NR4UE4UNL4BF3BD3 M 
1570 K1**-"BRU6N6BD6BR3" 
1580 K2»- "BU6R3FD2BL3D2R4BR3 " 
1 590 K3*«" BU6R3FDGNL2FDQNL3BR4 " 
1600 K4*-"BU6D4R3NU4NRD2BR4 M 
1610 K5*-"R3EU2HL3U2R4BD6BR3" 
1620 K6*- M BUNUFR2EUHL2BU3ER2FBD5 
BR3" 

1630 K7*-"BU6R4D3GD2BR4" 

1640 K8«-"BRHUEHUER2FDBNL2FDBNL2 

1 650 K9*= " BLFR2EU4HL2BDFR2EBD4BR 
3" 

1660 K0*-KO» 

1670 HF*-"BU2R2BD2BR2" 

1990 * 

2000 DRAW "S8BH20,20"+AW*+BH*+BA 
♦+CT*+SS*+BI ♦+B9»+99*+BY»+CQ»+CU 
*+BR* 

2005 DRAW SS*+BN»+BA»+BM*+BE*+QU 
• 

2010 DRAW "9BBM13 i 40"+KW*+NH*+NA 
*+NT*+SS*+NI*+NS»+SS»+NY*+NO*+NU 
•+NR«+S8* 

2020 DRAW "BM20,60 ,, +AM*+BY«+SS*+ 

BN*+B A*+BM*+BE*-»-SS*-»-B I * +BS*+SS* 

2025 DRAW AC*+CH*+BE«+BR*+BY*+CL 

*+B9*+BA*+BN*+BD*+B9* 

2030 DRAW "BH5,80"+BH*+BI*+BS*+S 

S«+BN*+BA«+BM»+BE*+SS» 

2035 DRAW BI«+B8*+S8*+AS*+BT*+BE 

*+BV«+BE«+DT* 

2040 DRAW "BM15, 100"+KH»+NY*+99* 
+NN*+NA*+NM*+NE«+88*+NI *+NS*+88* 
2045 DRAW KC*+NH»+NE*+NR*+NY*+NL 
• 

2050 DRAW "BM5, 120"+NA*+NN*+ND*+ 



PEA COCK ENTERPRISES 

WE'RE PROUD 

CMAIL1ST IS A GREAT ADVENTURE - 
HUT NOT AN ADVENTURE GAME! 
An Address Book, Phone Book, Mai! Label Generator 
and a whole lot more. 
CMA1LIST is a powerful and professional MINI -DATA-BASE 
for home or office use, CREATE, ADD, DELETE, CHANGE, 
INSPECT. SEARCH. SORT, MAILING LABELS. TICKER FILE, 
and INVOICE all so easily, you'll wonder why you waited so long! 

<jp to 500 RECORDS containing 10 FIELDS can be stored per file 
(memory and system dependent). 
CMAILIST is available in the following versions; 
4.0 Cassette Systems (specify 16K or 32K) * 19.S5 

5.0 Disk Systems $24.95 
5.1 2 Drive Disk Systems with INVOiCing $29.95 
CMAILIST includes an easy to follow Comprehensive Manual 
£ 1 year warranty. 
SO JOIN THE GREATEST ADVENTURE OF ALL-YOU WILL BE A 
WINNER! 

C.iTOH ProWriters S«£Parallel S565 serial 

SEND FOR FREE CATALOG! 
Prices Include Shipping! COD Accepted on Software only! 
Send check or money orders to! 

PEACOCK ENT. 
194 CANNONGATE III ROAD 
NASHUA, NH 03063 
603-880 8169 Mon Sat 10-10 
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8S«+NH*+NI *+NS»+SS*+NN*+NA*+NW*+ 
NE*+8S« 

2099 DRAW NI4+N34+S8* 

3060 DRAW "BH3, 140"+KS*+NT«+NE*+ 

NV*+NE*+DT* 

2070 DRAW "BM3,160*+BC*+BA«+BT«+ 
SS*+8S«+NC*+NA*+NT*"»-SS*+88* 
207S DRAW BD*+B0*+B8«+88*+SSt+ND 
*+N0*+N8f 

2060 DRAW "BUS, 1S0"+A2*+DT»+B8*+ 
AD*+BA*+BD*+S8*+KD*+NA*+ND*+SB* 
2085 DRAW K2«+DT«+88*+AH»+C0*+CM 
•■»-8S»+KM**N0*-H^M*:BOSUB 3020 
2170 DRAW "BM3,20"+A3*+SS*+AP*+B 
A**BUt-»-CL* 

21B0 DRAW "BM 120 p 20"+K3*+SS*+KP 
*+NA*+NU*+NLt 

2 1 90 DRAW "BUS , 40 H +A4*+SS*+AA*+BR 
«+BT*+BH*+BU*+BR* 

2200 DRAW " BM1 20 , 40 " +K4*+SS*+Kft»+ 

NR*+NT*+NH*+NU*+NR* 

2210 DRAW "BM3,60"+A3*+BB*+AF«+B 

R*+BA*+BN»+BK» 

2220 DRAW "BM120, 60 " +KS»+S8*+KF* 

2230 DRAW "BM5,B0 ,, +A6«+SS*+AN*+B 
A*+BN*+BC*+BY* 

2240 DRAW "Bm20,80 l> +K6«+S3«+KN« 
+NA*+NN*+NC*+NY« 

/ \ 

Shifter B 

A talking "munch game" for 1 t 2 simul- 
taneous players. Developed by MIT grad in 
machine hmgudge for incredible performance — 
at fastest speed, you can cross the screen in 
about 1 second. Shifting maze adds surprises. 
Players greet each other when meeting. Can 
select computer as opponent fur 1 player. 

$20. 

Articulator I 

Add speech to your programs or change dialog 
! in Shifter, Digitizes your voice from audio tape; 
stund track may be put on tape as part of other 
programs. Comes with Basic callable interface. 

$20. 

Both available on cassette for 16 or 32 K. Ext. 
Basic not required. Sticks required for Shifter. 

29 ENTERPRISES 

1208 Country Ct. ■ Cary, NC 27511 
V J 



2230 DRAW "BH5, 1 00 " +A7*+88*+ AS*+ 
BU*+BSt+BA«+BN* 

2260 DRAW "BH120, 100" +K7*+BB*+KB 
»+NU*+NS*+NA*+NN* 

2270 DRAW "BM5, 1 20 " +AB*+SS*+AH*+ 
BE«+BN*+BR*+BYt 

22B0 DRAW "BH120, 120*+K8«+8S*+KH 
•+NE*+NN»+NR*+NY« 

2290 DRAW "BUS, 140"+A9*+SS*»-AB»+ 
BE»+BT*+BT*+BY* 

2300 DRAW "BH120, 140"+K9*+S8*+KB 
♦+NE*+NTf+NT*+NY* 

2310 DRAW U BM0,160"+A1*+A0«+SS*+ 

A0*+BE*+BO*+CR*+BG*+BE* 

2320 DRAW "BM112, 160« , +K1*+K0*+SB 

*+KB*+NE*+N0*+NR*+NG*+NE* 

2330 DRAW "BM0, 180"+A1*+A1*+SS»+ 

"BR2 M +AD*+BA*+BV*+BI*+BD* 

2340 DRAW "BM120, 180"+K1*+K1*+BS 

♦+KD*+NA*+NV**NI*+ND*:Q08UB 3020 

2330 DRAW "BM13,20"+AT*+BH*+BE*+ 

SS*+BQ*+8U*+B I * +BC4+BK4+SS* 

2353 DRAW BBt-*-BR*+CO«+CW«+CNt+SS 

•+BF*+CO*+BX«+SS* 

2370 DRAW U BH5,40"+BJ*+BU*+BM«+B 

P*+BS»+SS*+C0«+CV«+BE*+BR*+88* 

2375 DRAW CT*+CH*+BE*+SS*+BL«+BA 

*+BZ*+BY«+SS*+BD*+CO*+CG«+DT* 

2390 DRAW M BM15,60 M +KT*+NH*"KNE«+ 

8S*+NQ*+NU*+NI*+NC«+NK«+SS*+NB*+ 

NR0 

2395 DRAW N0*+NW*+NN«+8S*+NF«+N0 

*+nx« 

2410 DRAW "BM5,80 >> +NJ*+NU«+NHt+N 
P»+NS*«-SS*+NO*+NV*+NE*+NR*+SS* 
2413 DRAW NT*+NH«+NE*+SS«+NLt+NA 
*+NZ*+NY* 

2430 DRAW "BM5, 1 00" +ND*+N0*+NS*+ 
DT« 

2440 DRAW "S4BH13,120 M +KT*+NH*+N 

E*+S8*+NQ*+NU*+NI *+NC*+NK*+S8» 

2445 DRAW "R20"+SS«+NF*+NO«+NX«+ 

BS»+NJ*+NU*+NM*+NP*+NS* 

2447 DRAW SS*+NO*+NV*+NE*+NR*+SS 

»+NTt+NH**NE«+SS*+ " R 1 6 " 

2470 DRAW "BM5, 130"+ SS«+ND*+N0«+ 

NS*+DT* 

24B0 DRAW "BM25, 1 50 " +K 1 *+DT«+88* 
+NR*+NE*+ND*+8S*+K2*+DT*+SS* 
2485 DRAW NL*+NA*+NZ*+NY«+SS«+K3 
*+DT«+SS*+NB*+NR*+NO*+NW*+NN* 
2487 DRAW S8«+K4«+DT«+S8«+NS«+NH 
«+NA*+NL*+NL*: GOTO 3010 
3000 GOTO 1990 
3010 GOTO 3010 
3020 A»-1NKEY» 

3030 IF A0- H 8 M THEN GOTO 3040 EL 
SE GOTO 3020 
3040 PCLS: RETURN 
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COMMENTARY 



Peeking Into The 
Hidden Commands 
OfTheMC-10 



By Tom Sziucha 



At first glance, the MicroColor Computer (MIC) 
recently introduced by Radio Shack appears to be 
well-suited for beginning programmers, but may 
turn away many advanced programmers because it lacks 
several commands needed to manipulate machine code. 
After some detailed examination into the BASIC interpreter, 
1 have found that this is not entirely true. Besides the 68 
documented commands and f unctions, there are at least five 
undocumented commands that, with some study, should 
allow an unleashing of the machine language capabilities of 
this Miero-box, 

Tandy has built several undocumented commands into 
MICapparently for use with cassette-based software. These 
commands support various machine language functions 
which should allow them to market more sophisticated 
software than is allowed with BASIC. The quest for these 
"hidden" commands came f rom knowing that Radio Shack 
has a reputation for not always disclosing everything that 
they know (or should know) ahout the operation of their 
machines. It was also d riven by a desire to understand some 
of the differences between the basic used in MIC and that 
used in the CoCo. 

There are several techniques which can be used to estab- 
lish the existence of hidden commands. One of these tech- 
niques is somewhat hit and miss but ean be effective. Sus- 
pected commands are typed into the computer and the 
subsequent response is studied. For example, examine 
Table I which contains MIC's response to several com- 
mands. 

Table 1 — Response to Various Keyboard Input 



Command 

NEW 
LIST 
XYZ 
EXEC 



Response 
OK prompt 
OK prompt 
syntax error 
FC error 



Comment 

known command 
known command 
known garbage 
suspected command 



CLOADM S (searching tape) suspected eommand 
CLOADZ TM error verification 

in a syntax error. EXEC gives an FC error rather than 
syntaxerror indicating that MIC recognizes the existence of 
the command bnt needs more inf ormation to process it. The 
response to CLOADM is a familiar S in the upper lefthand 
corner of the screen as BASIC waits for a program t« appear 
at the cassette port. If CLOAD were typed instead of 
Typing NEW and LIST give the expected OK prompt, 
and XYZ is clearly reeognized as a non-command resulting 



CLOADM, the response would be the same, but note the 
response to CLOADZ, a TM error occurs. This indicates 
BASIC treats the "M" with special respect. In fact, BASIC only 
likes to see an M, space or quote after CLOAD. 

With several hundred commands used in the various dia- 
lects of TRS-80 language, not including countless possible 
new variations, the trial and error method of searching is 
obviously limited. Another technique which can be used to 
discover "new" commands is to examine the BASIC Com- 
mand Table. The Command Table is a list of key words used 
by the computer to distinguish commands and functions 
(rmm variable names. MIC's basic directory is located in 
memory loeation 57413 to 57470 (decimal). The short pro- 
gram (Listing I ) shown below can be used to "peek" at this 
list of commands. 

Listing 1 — Peeking At MIC's Command Table 

10 FOR A=574 1 3 TO 57670 
20 P=PEEK(A) 

30 IF P>127 THEN LPRINT CHR$(P-I28),:LPRINT 

A:GOTO 50 
40 LPRINT CHR$(P); 
50 NEXT A 

This program prints a list ofthecommandsand functions 
recognized by BASIC along witb the address of the last 
character in each command. These commands are stored in 
memory using the ASCII eode for each letter with 128 added 
to the last character of each command to indicate to the 
computer that it is the end of a word. Undocumented com- 
mands: EXEC, CLOADM, USR, VARPTR, and OFF. Of 
these, three have been determined to work, the other iwi 
will have to await further detective work. 

The hidden commands work essentially like their CoCo 
counterparts. The following is a brief description of eaeh. 
CL6ADM "f ilcname",S.E,T — Loads a machine language 
program named "filename." S is the address to 
start loading the code, E the ending address, 
and T, the transfer address; all of these are in 
decimal. 

EXEC X Executes a machine language program. If the 
program was previously loaded with CLOAD- 
M, X, the transfer address is handled automatic- 
ally 

YARPTR This is a function used to determine the address 
where a specific variable is stored It also can be 
used to determine the size of a string variable. 
This is a very powerful command, allowing 
string packing for fast animation and allows 
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fast sorting routines — a real gem to have on 
MlC. See Ron Mummaw's recent article 
"VARPTR— BASIC'S Hidden Command" in 
the June 1983 issue of the Rainbow. 
The fourth command, VSR, more than likely works in 
Color BASIC, but the address which holds the location of the 
user-supplied subroutine has eluded detection. Until this 
location can be f ound, EXEC can be used in many instances 
as a substitute. The fifth command, OFF, is in the key word 
table and is recognized by the computer, but there is nothing 
to turn off. In Color BASIC, OFFworks with MOTOR and 
A UDIO, but these are not present as f unctions on the MC- 
10. It could be that this command is either a leftover or is 
present f or a f uture enhancement. A call to Tandy's techni- 
cal hotline was of little use in obtaining more detail on these 
commands. It appeared that they were learning about these 
hidden commands for the first time f rom the phone inquiry. 
Their response as expected was that the commands were for 
"f uture applications" and they were not aware of any f urther 
intended documentation. 

It iscertainly exciting to discover this hidden power in the 
MC-10, but somewhat disappointing that a CSAl'EM 
command was not also diseovered. The lack of a machine 
language save feature appears to be the only major stum- 
bling block to writing machine code on this computer. To 
test the EXEC and CLOADM commands, I resorted to 
writing a short test program on the CoCo, saving it to tape, 
then inputting it to M IC. Once a commented disassembly of 
the BASIC ROM is available, a save routine can be deve- 
loped, Also, it may be possible to trick the machine into 
savingmachine code by changing the BASIC pointers. Looks 
like more detective work ahead. 



KALEIDOSCOPIC CREATIONS 
PRESENTS 

scRAWBrr 

AN AMAZING NEW WORD GAME 

FOR 2 TO 4 PLAYERS THAT 
CHALLENGES THE INTELLECT. 
WILL YOU HAVE THE "SMARTS" 
TO UNSCRAMBLE THE MESS? 
FOUR DIFFICULTY LEVELS. 
FUN FOR ALL AGES. 
GREAT AT PARTIES. 
16K NON-EXT. TAPE 

SEND $15.95*(DELIVERY INCL.JTO 

KALEIDOSCOPIC CREATIONS 

P.O. BOX 1284 /f^5\ 
MELROSE PARK. IL 60160 
•Illinois reildanU add 6% lalai tax. 

FOR THE TRS 80 COLOR COMPUTER 



By the way, BASIC code in MC-10 is stored almost identi- 
cal to the method used in the Color Computer. Bytes 1 and 2 
of a command line point to the next command line. Bytes 3 
and 4 contain the line number. The next bytes (up to 124 
more) contain the coded commands, variables, constants, 
etc. The commands are tokenized, the rest in ASCII code. 
As pointed out by Dan Downard in "Technical Review of 
the MC-10" in the July 1983 Rainbow, the tokens are not the 
same as those used in ColorBASIC. In afuturearticle, I plan 
to show a software routine to convert programs written in 
Color BASIC on the CoCo to load and run on the MC-10. 

In a related topic, I have noticed that the MC-10 seems to 
run BASIC faster than the Color Computer. To verify this, I 
ran the simple Benehmark program shown in Listing 2 to 
compare them. 

Listing 2 — Timing Program 

10 FOR 1=1 TO 1000 
20 PRINT 1 
30 NEXT I 

Sure enough, the MC-10 took 17.5 seconds, whereas the 
CoCo took 20.7 seconds. It takes the speed-up POKEioi the 
CoCo to beat its little brother (13.9 seconds). Since the 
BASIC clock speed is the same for the two computers at .895 
mhz, I attribute the faster execution speed to more efficient 
interpreter code in the MC-10. 

( / would like to acknowledge the technical contribu- 
tions of my 15-year-old son, David Szlucha and his 
16-year-old collaborator, Dean Swain. These micro- 
teens made many of the discoveries discussed in this 
article within hours of unpacking our new MC-10.) 



wild party 

A naughty, sexy computer game 
for 2 to 6 couples. 
Game varies 
every time you play. 
All prompts from TV screen, 
no need to read 
complicated instructions. 
Send self-addressed stamped 
envelope for program descrip- 
tion and instruction sheet. 

On cassette tape. 
For 16K Color Computer. 
Extended BASIC not required. 

835-00 incl postage. 
(PA re sid add 82.10) 
Send check to P.O. Box 210, 
Jenkintown, PA 1 90*f 6 
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COMMENTARY 



MC-10 vs. CoCo 
A Command Summary 

By Frank Smith 



While poking around inside my PoCo I made some 
interesting discoveries. One thing [ noticed was 
that Microsoft managed to pack plenty of power 
in that 8K ROM. I kept running into so many commands 
which belonged to Extended BASIC on the CoCo that I 
decided to make a comparison chart between both levels of 
BASIC on the CoCo and Micro Color BASIC. The Extended 
BASIC commands are marked with a #. The only real disap- 
pointments are the lack of EDIT and ELSE, 

Radio Shack has made provision for an easy upgrade to 
20K by using a socket which can hold a 16K RAM module 
(Cat. No. 26-3013, $49.95). 

As mentioned by Thomas Szlucha in articles last month 
and this month, there are some BASIC words which are not 
mentioned in the documentation that comes with the PoCo. 
Could there be more? 



CoCo Functions 


MC-19 Function* 


ABS(numcrk) 




ASCtsIr) 




» AT\< numeric) 




CHRJ(codc) 


.. orirW 


U COS<imroiTic> 


(XXSlnument) ' 


EOF{f) 




# EX P< numeric) 


..i tXPf,,-.e t i kV ■ , 


S E1X{ numeric) 








INKEYJ 




IN I (numeric! 




lOYSTK(j) 


:v 


f..I31TS(!Jf < lfci« 6 th) 


»-sr-i- . ;■; 


LEHtsir) 




LOG<numenc.) 




MEM 


.:; MFM . ;.- ■ 


MlOSi'.i-.^.vl.'iif.ihj 


MIPS<l.t»i«K-P«.!«)) 


PEEKOocation) 


.■; vtWfii ■ 


POJNT<x.y) 


■ POWfc.y. . . , ,, 









M< 40 IWtiofta' "" v " ; 


It PP01]ST(x,y) 




RIGHT$(str.c) 




RKlXn) 


_L_ 




.V.. 


siCllmertc) ' 




U STRIN'CillrnglN.tiiOe'l 






~ 'stKt(x)- ' -— ^ 


It SQR(iiUmeric) 


riORintimefw:) - 


it TAN(numeric) 


... 


It TIMER 




ff USR(x) 


LSRixKv 


VAUslr) 




V'ARPJ'Rlvar) 


>> VARi 1 fRj varj't-.. ' 






CoCo Statements 


VtC-W Stateirmlts . 


AUDiOON ; AIJDIOOFF 


.;:•■■'„■ ; 


% CIRCI F£x y)r c bws e 




CLEAR n.h 


;■ q JCAR. Ear n.h 


CI.OAD 


;• CLOAti ■•• ; •••>>.■/■ 


CLOADM 






{.LOAD* ; , 


CLOSt d 




CLSr 


• <"i.s.'c? • : ■ .; 


* CXlLORKorcgnd.hackjysd} 




CON T 


:.;.CONT . ; :• v'X 


(SAVE 


v,v<- 




rsAVF- , ;.; ' . : : v..";.:. 


DATA 


r ; a r a 


It L>Er FN 




A DEHJSRn 




DEL 




UIM 




f» DLOAU 




If DRAW 




» EDIT 




END 
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PftfSFT LHt ' C "' Val " C) 


— ■ 

— 






W p R ^ T ■■■ 


' — — 


' ' Z ' — 

PRINT£d)n 


PKIM'O n 




' -';" .; : 4' 






PR1NTTAB 


PFUMTAB " 






# PS£T (A.y c) 





- Pi: f i>is r :,H;nd),icrc.a<;l- 










~— • 

~ , 






,_JLM?^L_ — __ 




^^ t ' ) ^ >i — 








RUN 




# SCREEN sueeii-iypt; clrsct 




' S&l'pF^"' 








sotNi)u , li; , 1ur[) — 

— _i — "" t -* t> — _ — 








H TROFF 


-2- 


it IRON 





COMPUKIDS MAGAZINE 



The Computer Magazine for Beginners CompuKids Club 

1 year magazine subscription 
Contests with GREAT prises 
Free computer advice 
Program exchange 
Educational programs 
. . . and iots more . . . 
One year subscription plus one year membership in CompuKids Club — $24.00 

(Canada — $31 .00) 
One year subscription only -$16.00 (Canada -$20.00) 
Six month trial subscription — $9,00 (Canada -$1 1 ,00) 
Payment enclosed (check or money order) 
Please bill me later (a $1.00 billing fee will be added) 

(Special School and Group Rates Available) 



Educational articles that are easy to understand 
Game programs 
Computer book reviews 
Program problems 



□ 
□ 
□ 
□ 



Zip Code Phone 

Mall Check or Money Order to: Or Phone TOLL FREE: 

CompuKids Magazine n 1 -800-822-KlDS 
P.O. Box 874 
Sedalla. MO 65301 
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Software RevlewZ 



Lower Case Interpreter 
Could Be Time Saver 



Wish you were able to type program listings in lowercase 
mode instead of having to toggle baek and forth between 
lower- and uppercase with the CoCo's cumbersome Shift-t? 
Wish no more, The folks at JARB Software have come up 
with a nice, short machine language program that allows 
you to type in lowercase mode not only the messages within 
quotes that you want in lowercase, but also the BAStc com- 
mands that otherwise require an uppercase input, 

LCI NT, which stands for Lower Case Interpreter, is a 
short machine language on tape that loads in less time than 
what it takes to insert the cassette in the tape recorder. Two 
versions of the program are included on each side of the 
tape. LCI NT 16 and LCINT32, for a 1 6K ... Oh, but you Ve 
guessed what the two versions are for. Once you've loaded 
the appropriate version on your machine, you type in 
EXEC. Nothing noticeable happens just yet, But press Shif t- 
0 and type the following line: 

10 print "Show us your lower case!" 
Now LAST it. The line now appears as 

10 PRINT "Show us your lower case!" 



? ^1 " " I MP ■ —mm.* tu i_ 



|The Original FLEX ™ for Color Computers 



and when you RUN the programyour message appearsjust 
as you typed it, with reverse video characters indicating 
lowercase, unless, of course, you have installed one of the 
lowercase boards on the market. And, if you have a printer, 
true upper- and lowercase would be displayed. The impor- 
tant thing, however, is that the lowercase BASIC command 
prinl was accepted as typed, permitting easier input. 

LINCT also provides a single key PAUSE function, 
implemented with the CLEAR key, which would not only 
perform the same functions as SHIFT®, but gives you the 
convenience of single step through program listings or 
through disk directories, leaving the normal functions of the 
CLEAR key untouched when not listing a program or a 
directory. 

If you have a need for printing messages in upper- and 
lowercase in your BASIC programs, this machine language 
utility can be a timesaver. The program performs as adver- 
tised. The 16K version resides in memory locations &H3F60 
through &H3FFA. and the 32K version resides between 
memory locations &H7F60 and &H7FDF, The program 
comes on cassette tape, but is disk compatible, Although the 
documentation consists of a single sheet, it proves adequate 
for this simple application program. 

(JARB Software, 1636 D Avenue, Suite C, National City, 
C A 92050, S10.9S) 

—Dr. Carl«<; Calk 
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* Upgrade to 64K 

■ RS to FLEX, FLEX to RS We transfer ability 

* Create your own character get 

* Automatic recognition ol single or double density and single or 
daubed sided 

* All features available (or either single or multiple drive systems 
4 Sellable Disk Drive Seek Rates 

■ Faster High Resolution Video Display with 5 diffurem formats 
' Save RS Basic from RAM to Disk 

* Move RS Basic to RAM 

* Load and save function on FLEX disk 

" 24 Support Commands 1 2 with Source Text 

' External Terminal Program 

Languages Available 
Pascal, Fortran, RS Basic, RS Assembler, TSC Basic, TSC Assemb- 
ler, Relocating Assembler, Macro Assembler, Mumps 



_. _ , (M*<J»omiiii« tow TRS^OC Coh» Ccnoutcr WORK 

tor YOU; from Part* and PteMS to Puff. R*»Oy t o UK SYSTEMS DOT ft COUP <**»«(, 
»•». »r»iwr*. *nd SUPPORTS Corn^u**- SrSTtfctS. „* j«,t Sufc-anr. CALL OXTA- 
COMP TODAY bmte|<wC<»ifNl>> WORK FOB YOU! 



FLEI9 Special General Version x Editor & AMemcwr l«hch normally sell lor S5t.0J 

r?M*TE(«S, Ft EX9 Coders™ H.ut. lor We RS Dsk Controller 
«hflri purchaser) v»ilh Sp«o« benerat Ft FX9 ssy*. 
—'-"id without the General FLEX* Syis. 



aq!ualr,4.<SE 
FL6X9 ' Oo«« ln U System II you « 
Extremely POWerfcj! Business BASIC. 
>Mhaliorwye*piK>iitysoY«i, " ' 

FOU «:* I ' Irt- FLFX9 



) ,il„ System I you Km 

in your iju.'iiMi or begin 
' by doing some Computer Werk (or rr 
wordprocessmg Payroll. Accounting ir 
TO me FUEW •Derating System "Hoi 



s -r , i a 

Hi ' i« I II, i ,t , T-i - '.*-s'-<4 
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"FLEX is a trademark of Technical Systems Consultants 

DATA-CO^P. 



SPECIAL SYSTEM PACKAGES 

MKBadtoStrackCOLORCOMPUTERRaaioStuc* COLOR OISK CONTROLLER. • Disk 
Drive system, bpccill QenerM version of fLEXS . F-MATE(RS) " arid * (hi at 10 
OouW* 0*<»»<ty Dfjkjmro; • COMPLETE. tM4» to fun SYSTEM on yew Color TV Set 



OtSK ORIVE PACKAGES. *tc 

These Packages include the R.re'ioSiar.k Disk C»»i 
Cattma. and Disk Dnve Ca»le 
PAK * I 1 Single Snfprf. DouMe Density Sys 
PAK a ■■ 7 Single Sided 0m** tensity •:, , 
PAK t3 i Oeunie Sided. Oo.»ie Pensily 
PAK *4 2 Dnuklr- Sided Dauble Density Sys 
PAK *5 - 2 Oume Thmline Double Sided •outue ienSity Sys 
PARTS AND PIECES 

fiiHi. Snack Oisk Controller 
' Smjie sided. Doutte Density DISK Drive I andon 
* iovoie SpfJed Ow*te Dsnwiy iid* throe 0,«n», 



Sk eVweswilh Power Supply an 



$48995 

556995 
5919.95 
$749.95 



'••«' V. -:»..li, u..lr'. ».V«V 

^.V, Sing* Drivs Cafc.net wfltt Po»«r Supply 
v „ s Double Drwe Cabme! with P#w«r Suspty 

D;u»e D-ive k R5 none 

«w teth f ln= LOWER CASE OOM SJ 
H«to Snack BASH, ymim t.t ROM 
fW Stiac E»i«nd»d BajK ROM 

HfXSON, TN 3734$ ^| 



I he RAINBOW September 1983 



Software Review* 



Save Time 
With Tape Utility 

Tape Utility from Speetrum Projects is aetually a set of 
nine operations to make living with a Color Computer a lot 
easieror, at least, a lot less complicated. To begin with, Tape 
Utility ean be used with either a tape or disk system, but 
using with a tape-only system willyield only f ourof the nine 
operations available on the program. 

The program is written in machine language and comes 
with a four-page documentation which was found to be 
fairly eomplete. After a CL 9 A DM and EXEC command a 
menu appears f or the user to select one of the many options. 
While the program is running, no BASIC or Disk basic 
commands are available. A command is present to return to 
BASIC and typing ETEC will start up the program again. 

1 would categorize this utility as one of the "make things 
easier" variety — that is, a program that will, for the most 
part, do things that are possible to do without the utility, but 
take a lot more time to do. With this in mind, I jumped in, as 
many users would, and used the program without a com- 
plete review of the documentation. The results yielded only a 
fewsurprisesand, upon closer scrutiny of the instructions, 1 



AUTO-DIALER 

BY SOUNDWORKS 

TsfTJlTOMATlTnioN^^ 

Sf ULTRA HIGH SPEED DIALING AND 
REDIALING 

& STORE OVER 50 NUMBERS 

Gf NO MODEM REQUIRED 

Gf NO TONE SERVICE NEEDED 

SIMPLE HOOK-UP 

Sf ADAPTABLE TO ANY PHONE 

Sf 16K EXTENDED REQUIRED 



CASSETTE $24.95 DISK^ 34.95 



Soundworks Productions 

26 EAST 7th STREET 
PATC HOQUE,NEW YORK 1 1772 

NLlt-lttiMMll' A»0*lt« TAX 



discovered most of the surprises are covered in the docu- 
mentation. 

What does this program do to make lif e easier? To begin 
with, tapeuserscan print a directory, either on screen or ona 
line printer of a given tape. The directory will include the 
name of the file, type (BASIC, machine language or Data), 
file mode, start, end and execute addresses of each program. 

Surprise number one came when I tried to terminate the 
reading of data before the tape was completed. Tape Utility 
will only terminate while reading data and not during a gap 
or blank seetion of the tape. Yes, this is all covered in the 
documentation, but it does create some problems if you read 
an entire cassette and want to get back to the Tape Utility 
menu. You must either restart the program or read some 
dummy cassette data to enable the BREAK key stop option. 

Tape users may also easily make tape-to- tape copies of 
BASIC, machine language or Data programs. Tape Utility 
will not copy some autostart and most copy-proteeted disks 
and tapes. 

Disk users are given six more options on Tape Utility. The 
program will easily eopy a file from disk to tape, or tape to 
diskand do an automatic copy of anentire disk of programs 
to tape. Those of you who have used the CSA VE and 
SA VEM command will understand how much easier it is to 
use Tape Utility than continuous PEEKlng for start, end, 
and execute addresses of machine language programs. Tape 
Utility also includes some disk-only functions such as dis- 
playing a two-column compressed directory on screen or 
line printer and setting default drive number other than 
drive #0. Unfortunately, the disk directory given does not 
include start, end and execute addresses as the tape directory 
does. Tape Utility also does not include a simplif ied disk-to- 
disk copy routiue. The user must return to Disk BASIC to use 
the C0PY command if this needs to be done. Although 
C0PY is easy to use it would be nice to have something like 
it available while Tape Utility is up and running. Tmpe 
Utility also does not "fix" tape programs written in the disk 
operatingarea. Attempts to usesuchprogramsmay result in 
a crashed disk and a very frustrated user. This surprise 
(number two!) is not covered in the documentation. 

Tape Utility will copy programs up to 10K in length in a 
16K machine and 26K in a 32K machine. Users are cau- 
tioned in the documentation that Tape Utility will not copy 
segmented files produced by some assemblers. Tape Utility 
will recover f rom errors that are encountered during a read 
of a tape file, however. This unique ability is especially 
valuable if you are doing long tape-to-tape or tape-to-disk 
copies. 

The decision on whether to buy Tape Utility or not is 
really a matter of the personal preferences of the user. The 
program is straightforward and performs as documented. It 
is a matter of time saving and convenience. Decide whether 
you want your CoCp to do the ma jority of the busy work 
involved in copying and catalogingtapes or if you havea few 
extra hours to do it yourself the hard way. I prefer to have 
the computer do the busy work and consider this program 
well worth the price. 

(Spectrum Projects, 93-15 86th Drive, Woodhaven, NY 
11421, disk or cassette S24.95 plus $3 s/h) 

—Brian James 
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Software Revlew^^^^^^^^^^^^fZ\ 

Humbug For the MC-10 



Shortly after reviewing the new MC-10 "PoCo CoCo," I 
received a telephone call from Pete Stark of Star-Kits. Yes, 
in the same issue in which 1 stated that machine language 
was apparently not supported by the MC-10, an ad 
appeared for Humbug. Anyone familiar with Humbug 
knows it's one of the nicest monitor programs for the CoCo. 
Thanks to Pete, we now know that there is an EXEC and 
even a CLOADM command that are undocumented . 

Taking advantage of the hidden commands, Humbug 
appears to be the first piece of commercial software for the 
PoCo, As 1 am machine language oriented anyway, 1 cannot 
think of a more useful tool for exploring the new computer. 
There is only one minus, the availability of memory. With 
only4K ofon-board memory, Humbug occupies a little less 
than 3K. After housekeeping and screen memory only 
around 400 bytes remain for user programs. Radio Shack is 
already advertising a 16/20K upgrade module, so, by the 
time you read this, the memory limitation should not be a 
problem. To combat this problem three different versions 
arc available at different memory locations as the 6803 
Processor is not capable of position independent code. 

Before covering the different commands available, let me 
say something about the manual. The 25 pages of excellent 
instructions are not only complete with source code, but also 
contain a wealth of information on the MC-10, a memory 
map along with several addresses of key ROM calls. 



The manual ean be considered a standard of comparison 
and is alone worth the cost of the software. For example, 
one of the addresses points out the fact that Radio Shaek 
didn't use the on-board serial interface for the RS-232 port. 
Addresses are given with proper values to control the RS- 
232 Baud rate from 110 to 2400 Baud. There is even a 
command to change the Baud rate, 
Commands 

Following is a summary of the commands implemented 
by Humbug. A detailed description of the operation of each 
command is given in the operation manual. A few are worth 
noting. The AT or analyze tape command will document the 
contents of an unknown tape, giving you the program name, 
format, number of bytes and the start, end and execution 
addresses. The Fl command will allow you to search any 
section of memory for a hex string. The SA commands allow 
you to make machine language tapes. Full breakpoint con- 
trol and single-stepping of programs is supported. 



AD 


— 


Formatted ASCII Dump 


AI 


— 


ASCII Input 


AO 


— 


ASCII Output 


AT 




Analyze Tape 


BA 


— 


Change Baud Rate 


BP 




Print Breakpoints 


BR 




Set/ Reset Breakpoints 


CO 




Continue 


cs 




Checksum Memory 


DE 




Dcscmble 


EX 




Exit to BASIC 


Fl 




Find 1 , 2 or 3 bytes 


FM 




Fill memory with constant 


HD 




Hex dump 


HE 




Print command codes 


JU 




Jump to program 


MC 




Compare memory 


ME 




Memory examine and change 


MM 




Move memory 


MT 




Memory test 


RC 




Register change 


RF 




Register examine 


SA 




Save M L to cassette! 


SS 




Single-step 


ST 




Start single-step 






Monitor reset 



Humbug has a unique feature using the SHIFT-@ com- 
bination that is used in BASIC to pause operation. When a 
SHIFT-@ is encountered one offourcommandscan follow. 
A "P" will toggle the pause mode which pauses screen out- 
put afterevery 1 6 lines forexamtnation. The letter^O" turns 
the RS-232 port on and off for printer output. Hitting 
BREAK will cancel any program and return to the monitor 
prompt. Any other keys will resume the program. 
Summary 

As Humbug has been around on many other 68XX sys- 
tems for quite a while, you will have no problems with 
operation. It is time- and user tested and this reviewer 
played with the commands for quite a while and found no 
problems. You will find commands not available on most 
computer monitors in Humbug, I recommend it to anyone 
who wants to run machine language programs on their new 
MC-10. 

<Star-Kits,l».O.Box 209-R, Mt. Kisco, NY 10549, $29.95on 
tape) 

—Dan Dawnard 



UPLOAD 916.35 
This is the UPLOAD side of DLOAD and 
DLOADH in Extended Color Basic. Send a 
basic or machine program to another ECB 
Color Computer. Programs can be passed 
directly or by phone if both computers are 
hooked to modems. (not supplied). Uploaded 
program arrives at the receiving end ready to 
ft vet runt or execute. Patch to correct the 
flaw in DLOADM is supplied in public domain* 

IHDEXER 414.85 
Program produce* a sorted list of variables 
and line numbers used in your basic program. 
Following each variable or line number will 
be a li sting of the numbers of the basic lines 
which contain the variable or line number. 
RUNning the basic program is not required. 
Bonus! Global search of basic program for a 
variable, a text string, or a basic keyword. 

Past machine language 
16K/32K EXTENDED BASIC, Tape or RS Disk 
Add V2.00 for shipping and handling 

/f^\ HL-US'R SOFTWARE if^\ 
rainbow 1 15 RISING SUM* Dept R rainbow 
FORT MITCHELL, KY 41017 CEn ™" ,CM 
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TORIAL 

De-Mystifying PCLEAR 0 

—Ron Krebs 



Several articles and hints have been published outlining 
the techniques and desirability of performing 
PCLEAR 0 on the CoCo to provide maximum avail- 
able memory. There is some confusion however, regarding 
the possibility and/ or proper method of doingn PCLEARO 
when using the disk system Please review your Extended 
BASIC manual if you are not completely familiar with the 
PCLEAR statement. 

Let's review for a moment the method of doing a 
PCLEAR 0 without the disk system: 

Type: P»KE&H19,6:NEW (ENTER) 
The POKE instruction causes avalue of 6to be poked into 
location $19. Memory locations $19 and SI A (Decimal 25 
and 26}, combine to form a t6 bit pointerregisterwhicb tells 
BASIC where the main source buffer is located. Memory 
location $ 1 A is *0' so the P9KE operation sets the two byte 
pointer to $0600. After the pointer is initialized, the NEW 
statement causes other basic registers to adjust accordingly. 
But here is the important point: 

When power is first turned on, basic causes the memo ry 
(Ron Krebs has many years of 6800/6809 program- 
ming experience almng with a background in technical 
sales and management. Ron and his wife Mona own 
Mark Data Products.) 



cell at location $0600 to be cleared because it requires the 
first byte of the source buffer to be cleared for proper 
operation. Now, let's observe what happens to memory 
when power is f irst applied to the CoCo. !f you have a means 
of sequentially PEE King through memory you will gener- 
ally find that the dynamic RAM used in your CoCo will 
have alternating bytes set to 0 and SFF. Depending on the 
memory chips used, your CoCo may have all the even bytes 
set to zero or it may be the odd ones. 

Next, let's look at a possible means of performing a 
PCLEAR 0 with a disk system, After reserving some RAM 
for the D#>S, we decide to locate the source buffer at $0E00: 
Type: Pt>KE&H!9 t &H#E:NEW (ENTER) 

This should do it, but we find that it works with some 
computers and doesn't with others! Why? Because we don't 
know if the byte at location $0E00 is cleared or not! Dn some 
computers it will be and on others it won't. We have now 
identified the problemand the solution is easy. To PCLEAR 
0 with a disk system installed; 

Type: Pt>KE&HI9, &H0E;POKE&H0E00, 0:NEW 

The second POK£statement does the trick! BASIC has the 
required zcxm byte at the beginning of the buffer and will be 
perfectly happy. Your CoCo has more memory to work with 
and I hope that makes you happy too! ^ 



Jhtjnm industries, inc. 

22511 Katy Freeway 
Katy (Houston), Texas 77450 



To Order 
1-800-231-3680 
800-231-3681 



In Texas, Orders, 
Questions & Answers 
1-713-392-0747 

SAVE BIG DOLLARS ON ALL TRS-80® HARDWARE & SOFTWARE 

TRS-80® by Radio Shack. Brand new in cartons delivered. Save state sales tax. Texas residents, 
add only 5% sales tax. Open Mon. - Fri., 9-6, Sat., 9 - 1 . We pay freight and insurance. Come by 
and see us. Ca " us for a reference in or near your city. Ref: Farmers State Bank, Brookshlre, 



WE OFFER ON 
REQUEST 

Federal bpress (overnight delivery) B 
Houston IntercoffiiirBite) Airport B 
Delivery, Same Day Semce 

U.P.S. BLUE -Every Day S3 

References If om people who hive Ld 
bought computers from us prebebly 
In your city. We hive theusands 
it sillillftd customers. WE WILL 
NOT BE UNDERSOLD! 

ED McMANUS 




No Tai on Out of Tews 

Save 
10% 15% 

OR MORE 



TELEX: 77-4132 ffLEXS HOU) 



WE ALWAYS 
OFFER 

0 We accept MasterCard, Visa and 

American Express cards 
B We use Direct Freight lines. No long waits 

B We always pay the freight and insurance 

B Toi free order number 

H Our CBpabftry to go to the giant TRS-80® 
Computer warehouse S hours away, in 
Ft Worth, Texas, to keep you in stock. 

JOE McMANUS 

P5Q 
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The Dragon Is Coming! 

By Bob Rosen 



Just what is this Dragon 32 that you see on the upper 
left hand eorner of the cover of Rainbow Magazine? 
The Dragon 32 is England's answer to the Color Com- 
puter. (And a most impressive answer it is!) To start with, 
the first thing you notice when you see it, is that it has an 
improved keyboard. Upon closer inspection, it is similar to 
the original Model 1 keyboard manufactured by Hi-Tek. It 
is a standard 53 key Qwerty keyboard with a very niee 
smooth feel to it. Upon powering up, you get the following 
logo: 

(C) 1982 DRAG0N DATA LTD,16K BASIC INTERPRE 

TER 1.0, 
(C) 1982 by M1CR»S»FT 

As you can guess, it is the same Microsoft who wrote the 
BASIC for the Color Computer. To my surprise when com- 
paring the Quick Ref erence Card of the Dragon32 to that of 
the CoCo, they have the exaet error eodes and statements 
except for DLOAD, The reason DLOAD is missing is that 
the Dragon 32 has no serial port. Instead it has a parallel 
port. #ne interesting command I noticed on the Dragon 
Quick Reference Card is the presence of a PRINT §-2 com- 
mand instead of the usual LPRINT commands associated 
with parallel ports. This eliminates changing all the PRINT 
tt-2 commands of a Color Computer program to LPRINT 
commands. Even though the commands are the same, the 
actual BASIC is different from the Color Computer. This is 
because TANDY has exclusive rights to their version of 
Microsoft BASIC for the Color computer. Wliile not all 
CoCo BASIC programs will run as is on the Dragon 32, I 
tried several RS Program Paks and they all worked cor- 
rectly, 1 even tried a long machine language program (Don- 
key king) and had no problems. Included with my Dragon 
32 was a pamphlet of programs f or it. This list has programs 
from Spectral Associates and Mark Data that have been 



previously sold for the CoCo. This leads to the assumption 
that even though CoCo programs may not run "as is" on the 
Dragon, they can be converted to do so. 

The Dragon 32 is aptly named as it comes stock with 32K 
of RAM. Unlike the 32K CoCo from Radio Shack, Dragon 
uses two sets of 16K chips instead of eight 64K chips. There 
are various hardware differences in the Dragon. The 
Dragon uses the PAL TV system instead of the U.S. NSTC 
system. Since there are no VHF TV stations in England, the 
RF output is on channel 33 and the bandwidth is eight mhi 
instead of six. The video mixer chip is a LM 1 889 instead of a 
MCI 372. The power supply (220 volts, 50 hz) is outside the 
computer and is connected via a DB-9 socket on the baek 
next to the power switch. The two joystick, cassette and 
parallel printer jacks are on the left side along with the RF 
output and reset button. The Program Pak port is on the 
familiar right hand side but there is no door. The Dragon 32 
has one jack that the stock CoCo doesn't have. There is a five 
pin . din jack on the back for video out. This is a decided 
advantage for those who want to do word processing to its 
fullest. 

Tosummarize, the Dragon 32 is a fine computer with very 
close similarities to the Color Computer, The extra features 
of a better keyboard, parallel printer port, video output jack 
and white case are a definite advantage. But the best news is 
that a Dragon will soon be coming to your neighborhood! 
Starting this summer, a U.S. version of the Dragon will 
begin production in Louisiana. It will be a XSTC version 
with a serial port. Price will be very competitive with the 
Color Computer and will give potential Color Computer 
buyers another choice. 



AUDIO AND VIDEO 
INTERFACE 

Provides SWITCHED color or monochrome 75ohm, 1 volt p-p video from CoCo. 
If you wish to use a high resolution monitor this interface is a must 
Separate enhancements are provided for color and monchrome outputs. 
This is not a simple emitter-follower add-on. 
'UNIT DOES NOT REQUIRE SOLDERING 
•INTERFACE IS ASSEMBLED AND TESTED 
*400mw AUDIO @ 8 ohms 
'TWO YEAR WARRANTY 
Price $49.95 (Includes Shipping) FREELAND ENG. 7503 N. Kerby, Portland, OR 97217 
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Software Reviews— — i— ^\ 

A Good Program 
With One Sour Note 

As a teacher who works with computers every day, I'm 
always interested in any new software that has the possibility 
for use in a elassroom setting. As a lover of music, I was 
especially pleased when ike Rainbow sent me Music Drill 
from Computer Island to evaluate. This program gives the 
user a chance to practice sightreading of ind ividual notes, as 
well as giving an audible feedback of the correct sound of 
that note. It requires 1 6K and Extended basic. 

Every profession has its own huzz words, and this pro- 
gram is what computer using teachers call a "drill and prac- 
tice" program — that is, it providesdrilland practice on skills 
already taught. This is not a "tutorial"type of program that 
would teach a new skill, so the user must already be some- 
what familiar with the musical scale and the placement of 
notes on the staff. Computers excell at the endless repetition 
that effective drills need, one reason such programs are so 
popular with teachers. Good tutorial programs are few and 
far between. They require careful planningand field testing, 
and generally require more memory than drill and practice 
programs. The essential difference between tutorial pro- 
grams (the teaching of new skills) and drill and practice 
programs (reinforcement of previously taught skills) should 
be kept in mind by anyone selecting software for use in the 
home or school. 

Well, now. You have selected Music Drill because you or 



your kids want a way to practice sightreading of notes, and 
the association of the sound to its position on the staff. What 
will you see when you run Music Drill? First, you are asked 
if you want to practice the bass or treble clefs. Then, you are 
presented with a menu of the keys available, including a 
"mixed key" mode that will generate notes from randomly 
selected keys. When you select the key you wish to work in, 
the computer draws the staff and plays the scale in that key. 

Next, a note is placed on the staff but not played. You 
then indicate your guess by pressing the appropriate key (a, 
g, f, d, etc.). If the guess is correct, the computer plays the 
note and places another one on the screen. If the guess is 
incorrect, the computer gives an obnoxious sound and 
another chance to guess. After the third incorrect guess, the 
computer displays the correct answer, the screen clears, and 
the same note is placed on the screen. This routine is 
repeated until you press the correct key. (The "stalling" of 
the program until the user makes the correct response is a 
sound educational practice, and one I wish would be incor- 
porated into more software intended for classroom or 
instructional use.) 

After 1 0 notes, the computerdisplays the time you took to 
complete the round, and the number of notes you guessed 
eorrectly. 

Thcgraphicsin this program arc nicely done. The clefsare 
pleasingly and correctly shaped, and the notes appear where 
they should. The sounds generated are as cl ose as the com- 
puter can get to the true note (which, in nearly all cases, is 
pretty close). The documentation, though, is skimpy, both 
in size (a3.5 w by4.5"'sheet of paper stapled tothe inside of a 
paper folder) and content, hut does give the essentials to run 
the program. This program comes on cassette (which loaded 
correctly every time I used it) and is written in BASIC, 

My one complaint has to do with the scoring. After the 
third incorrect guess, the computer displays the correct 
answer, clears the screen, and places the same note on the 
screen. If the user presses the correct key (remember, they 
have just seen the answer), that is counted as a correct guess 
of a new note. Thus, in a round of 10 notes, the user could 
missall the notes the first time they are presented (after three 
guesses), and still receive a score of five out of 1 0 "correct" 
guesses, since each round of guesses is considered as a new 
note. 

1 feel sure the reason behind this is that the people at 
Computer Island did not want someone to feel a complete 
failure, even if they were just beginning to learn music, but 
the lowest possible score is five out of ten, even if all the 
notes are missed on the first try. The score report is worded 

"In minute(s) of drill, you guessed .notes correctly 

on the first try." Now, the user may have guessed some of 
those correctly on the first try, or all of them; or all of those 
"correct" guesses may have been on the second round (that 
is, after three incorrect guesses and a look at the correct 
answer). There is no way to know from the score report. 

As it stands, this program can be used for effective drill 
and practice in the home, but an improved score report 
(perhaps indicating the number of correct guesses on the 
first, second, and third tries) would make this program a 
good bet for classroom use as well. 

With the one reservation about scoring, I would recom- 
mend this program. 

(Computer Island, Dept. R, 227 Hampton Green, Staten 
Island, NY 10312, S19.95 an tape) 

-Mark WHHams 



INSIM Instruction Simulator 

Simulates the complete 6809 instruction sst. 
Use it to quickly debu* assembly prof^rawB. 
Use. it to find out how other programs work. 
Use it to find out how the basic rorns vork. 
Output to screen or printer. 
Includes commands to examine a/td chanee memory. 
PVen has a mini-disassembler 

16K ST ANDAfliy EXTENDED i39,95 

COMPRESS Reduce basic program sise. 
Removes spaces and comments, 

W OR I6K 17.95 

INTRSTlThe interest calculator 
Calculates hone mortgage payments or any 
loan payments. 

Calculates interest, total interest, total 

Calculates how much to invest bok to retire 
in style in TG years. 

This program vill calculate future values, 
present, values and much mare'. 

16K stabbaRb........ 112.95 

OEPREC Calculate depreciation using: 
Strait line, production unit, working hours, 
declining balance, sum-of-tha-yeare #igit». 
16K EXTEiDFJ) 110.96 

B.C. ENGINEERING 

P.O.BOX 768 
MANCHESTER, MO. 63011 
SEND CHECK OR MONEY ORDER. 

MO. RESIDENTS ADD 5.625% SALES TAX. "•=S ar 
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w/er Reader was intended not to teach but to rein- 

§-yr force the skill of measuring to the nearest eighth of 
J- Van inch. The program, using low-res graphics, draws 
a ruler and a colored line to be measured, then asks the 
student to input the number of whole inches and lowest- 
terms fraction of an inch. There is a graphics diversion after 
every three questions. This interim reward encourages stu- 
dents to continue, while successful ruler readers get a more 
extensive graphics "reward" at the end of the program. 

Don't plunk your children or students in front of the 
computer and expect great things, though. The program 
assumes previous experience with both linear measurement 
and fractions. After reviewing these concepts, 1 introduce 
the program on a classroom monitor and explain its use. 1 
pretend that the TV screen is a "window" over a yardstick. 
The yardstick extends to the left and right; the line to be 
measured also extends to the left, out of sight. If necessary, I 
demonstrate this with a 12-inch ruler and a piece of con- 
struction paper with a 2 x 3 inch horizontal rectangle cut 
out. After they have seen a number of examples on the 
screen, most students cateh on. There is a samplequestion in 
the program for review 

Once the instruction is finished, the computer handles the 
individual drill and practice essential to measurement skills. 
The computer is no substitute for hands-on activity, but it 
does help, and the ruler program gives me good results in 
terms of student interest and performance. 

The basic format and fraction manipulation in Ruler 
Reader are adapted from a program by D. B. Allison (80 
Micro, April 1982). 






Outline 


Line 


Function 


10-70 


Introduction 


80 


Sets values lor sample 


90 


Begin main program 


100-160 


Set values for each question 


180-220 


Whole inch routine 


230-340 


Fraction routine 


350-390 


Report on line length 


410 


Increment score 


440-460 


Report score, offer replay 


470-540 


Sample question 


700 


Delay for student response 


800 


Graphics diversion after three questions 


1000-1070 


Draw ruler 


5000 


Graphics reward at end 




• 

Variable List 




name of student 




choose sample 


V 


random length of line to be measured 


Kl 


adjusts line to ruler 


y 


question number being worked 




ruler color 




line color 




first number on ruler 


77 


total number of questions 


CW 


marker lor traction reduction bypass (avoids 




division by zero if fraction happens to be 




EG three whole inches) 




fractional remainder of line 




number of tries at inches 


v 


co^cTanswcMn^nches 0 " 




corrcc answer in mc es 




student input ol whole inches; also variable in 




fraction reduction 


VV 


delay counter 


AS 


student input of fraction 


LI.L,LS 


R.RS 


variables in manipulation of fraction* 


I 


reduced numerator 


Fl 


reduced denominator 


Z 


exponent counter in fraction reduction 


NR 


number right 


AV 


percent correct 


Y$ 


response to replay demand 


M 


memory location in graphics diversion 


C.H 


value of character poked to memory 


S.T 


randomization factors in graphics diversion 



September 198.1 Ihe RAINBOW 123 




The listing: 

10 'RULER READER BY T. GRAY 
20 * BASED ON "KIN8 KOMPUTER" BY 
D.B. ALLISON, 80 MICRO, APR. 82 
30 CLS:PRINT866, "CAN YOU READ AN 
INCH RULER? LET'S FIN 

D OUT!" 

40 PRINT: PR INT "THE RULER WE WILL 
USE IS LARGER THAN NORMAL. THI 
S MAKES IT EASYTO READ, BUT I CA 
N ONLY 8H0W A BIT OF IT AT A TI 

ME. 

50 PRINT: INPUT" TYPE YOUR NAME AN 

D PRESS <ENTER>"PN« 

60 CLS:PRINTB12B» "OKAY, "N»", D 

0 YOU WANT A SAMPLE QU 

ESTION?" 

70 INPUT" TYPE Y OR N AND < ENTER > 
" ; A* : I FA*< > " Y " THEN90 

80 ki-21:Q«0:ci=8:C2=4:n=i:qotoi 

40 

90 CLS:INPUT"OKAY, LET'S START N 
OW. HOW MANY QUESTIONS 



CONVERT YOUR PICTURES 
INTO BARD COPY 

CATCH THAT COLOR PM0DE3 
PICTURE ON PAPER (USING 

A C6P115 COLOR PLOTTER) 

* Machine language subroutines 

for speed 
•Auto start from cassette 
•Works with Kicro Kainter 
■Will print pictures from 

cassette 

•Includes sample picture - 
American Flag 
Just $14.95 Plus $1.50 postage 
and handling 

To: All-American Ultralight 
Industries/ (AUI) 
1144 Kingston La. 
Ventura, Calif. 93001 



DO YOU WANT? <PICK A NUMBER BETW 

EEN 5 AND 20> " I 22 : IFZZ<30RZZ >20O 

RZZOINT(ZZ>THEN90 

100 FOR Q-1TOZZ:N-RNDC10> 

110 C2-4:C1-RND<7>+1: IFC1-4THEN1 

10 

120 K-RND<24> : IFN>1ANDK<8THEN120 
130 K1-2*K+1 

140 CLS0 : PR I NT "QUEST I ON "Q; :GOSU 

B1000:GOSUB2020 

150 8H-0 

160 in-intck/b>:f«k-in*8:t-0:v-0 
:ca-n-i+in 

170 IF Q-0THEN470 

160 PRINT8320, "HOW MANY WHOLE IN 
CHES":INPUTA 

190 IF A-CA THEN PRINT8352, "THAT 
*S RIGHT, "|N*:FORW-1TO600:NEXTW 
:BOTO 230 

200 PRINT93B4, "NOPE — TRY AGAIN. " 
: FORW-1 TO600: NEXT: PRINTQ3B4 , " 

210 T«T+l: !FT<3THEN180 

220 PRINT8352, "THE ANSWER IS "C 

A" INCHES. " 

230 PRINTH352: INPUT"WHAT FRACTIO 
N OF AN INCH IS LEFT" ; A*I IFVAL K(\ 
% ) -0THENA-0: GOTO270 
240 Ll«LEN(A»>:iFLlO3THEN270ELS 

el«i:r«i 

250 L*-LEFT«<A»,L> :R*«RIGHT*CA«, 
R > : A3- V AL C L* ) : A4« V AL < R * ) : I F A4-0 
THENA-3ELSEA-A3/A4: IFA4>80RA4<2T 
HEN A-3 

260 IF MID«(A«,L+1, 1 ) <>" / "THENA- 

3 

270 IFGH-1THEN 320 

280 F0RZ-3T01STEP-1: IFF/20INTCF 

/2> THEN300 

290 F-F/2:NEXT Z 

300 if z«0anda«0then390 

310 fi-i:forp»itoz:fi»fi*2:nextp 

: Al-F/Fl 

320 IF Al-A AND F1«A4 THEN 350 
330 PRINT8416, "NOPE — TRY AGAIN": 
V- V+ 1 : GH- 1 : FORW- 1 TO700 : NEXT 
340 IFV-3THEN 370ELSEPRINT9416:G 
OTO230 

350 IF IN-0 THEN 380ELSEPRINTe41 
6, "THAT'S CORRECT, "N«:SOUNDi20, 
3:PRINT@44B, "LINE "Q" IS "CA"-"F 
"/"Fl" INCHES LONB." 
360 BOSUB700:6OTO410 
370 PRINTS44B, "THE CORRECT ANSWE 
R IS "CA"-"F"/"F1"INCHES. ":BOSUB 
700: GOTO 410 

380 PRINT8416, "RIGHT, "N*", LINE 
"Q" IS ": PRINT F"/"F1" INCHES L 
ONG. " : SOUND i 20 , 3 i GOSUB700 : Q0T041 
0 
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390 PRINT8416, "RIGHT, "N*".":IF 
Cfl"l THENPR I NT " L I NE "Q" IS ONE IN 
CH LDNQ" ELSE PRINT"LINE "Q" IS 
"CA" INCHES LON0.":SOUND120,3 
400 8OSUB700 

410 IFV-0ANDT-0THEN NR-NR+1 
420 IF Q/3-INT<Q/3)TH£NGOSUBB00 
430 NEXT Q 

440 CLS:AV-INTUNR/ZZ)#100) :PRIN 
T8160, "YOU BOT " ; NR; "RIGHT OUT O 
F "IZZ" FOR A SCORE OF "pAV?" PE 
RCENT. M : FOR W-1TDB00: NEXT W: IFAV-1 
00THENPR I NT " YO U DID VERY WELL. W 
ATCH THIS!" :FORW-1TO800:NEXTW:BO 
SUB5000 

450 CLS : PRINTS 128 f "WANT TO GO AG 
AIN? TYPE Y OR N AND <ENTER>": 
INPUTYf: IFY*«"Y"THEN NR-0:BOTO60 
460 CLS:PRINT"OKAY, "N«". I HOPE 
YOU ENJOYED THE GAME 

. " : END 

470 PRINT864, "EACH QUESTION WILL 
BE LIKE THIS"! .PRINTQ320, "HOW M 
ANY WHOLE INCHES?": INPUTA: IFA-1T 
HENPR I NT " THAT * S RIGHT, "N*", " 
480 PRINT"IN THIS CUESTION THE A 
NSWER IS 1 " : FORS-64 TO 94: PRINT* 
S,CHR*<12B) :NEXTS:OOSUB700 



STATISTICAL 
ANALYSIS PACKAGE 

Tw# programs to handle all your data crganizalion, 
display and analysis ne«ds!Firstprogram provides 1 . 
List of Data; 2. Before & AflerTotels; 3 Averages; 4. 
Dale Displayed in Bar Graph Form; 5. Frequency 
Distributions (With Graphic Display) Graph o< Fre- 
quency Distribution even allows you lo input 4 lines 
of text on iraphic screen be;»re pn'nitu*' 
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Sectnd program provides Analysis #t Variance be- 
tween treatment and control groups. Each step in 
calculation is displayed (raw scores, delta scores, 
deltas squared, grand square. SSB, SSW and "F" 
number). Program then tells you if variance is 
signiticanl and, if so, which group shtwe* improve- 
nienl. Primer Output Option. 32KEXT 

r :~ - \ include $1.50 lor handling lor each program. 
W * [j Az. Residents add 6% Sales Tax. 
■M3m\ ' 
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490 FORX-320TO413IPRINT8X, " " : NE 
XT:PRINT8320, "WHAT FRACTION OF 

AN INCH IS LEFT? (USE LOWEST 

TERMS). ": INPUTA* 

500 FORX«320TO415:PRINT8X P NE 

XT: PRINTS320, "REMEMBER, 2/8 AND 
4/8 ARE NOT IN LOWEST TERMS.": 
PRINT83B4, "THE ANSWER IS 1/4 INC 
H. ": IFA*-"1/4"THENPRINT8416, "SO 
YOU WERE RIGHT." 

310 PRINT-THE LINE IS 1-1/4 INCH 
ES LONG. " 
520 GOSUB700 

530 BOSUB 800:PRINT864,"IF YOU B 
IVE A WRONG ANSWER, I WILL TEL 
L YOU. YOU WILL HAVE 3 CHANCES 
AT EACH PART. AFTER THETHIRD TR 
Y I WILL TELL YOU THE CORRECT 
ANSWER. " 

540 PRINT: INPUT"DO YOU WANT TO S 
EE THE EXAMPLE AGAIN? TYPE Y OR 
N AND <ENTER>"?A«! IFA««" Y"THENB 
0ELSE90 
550 END 

700 PR I NTS 15, "PRESS < ENTER >": PRI 
NTe47,"TO CONTINUE M :A*-INKEY* 
710 IF INKEY**""THEN710 
720 RETURN 

600 0R-RND<12B)+127:FORW-1024TO1 
535: POKEW , GR: NEXT: CLS0: RETURN 
1000 ' DRAM RULER 

1010 FOR X-17T063STEP16:A-5:G0SU 
B2000:NEXT: '###INCH MARKERS 
1020 F0RX-9T063STEP16:A-3:GQSUB2 
000: NEXT: '### 1/2 INCH MARKERS 
1030 F0RX-5T063STEPB: A-2:GOSUB20 
00: NEXT: ' ###1/4 INCH MARKERS 
1 040 F0RX=3T063STEP4 : A- 1 : BOSUB20 
00: NEXT: »###1/B INCH MARKERS 
1050 Y-9:BOSUB2010: Y-17: BOSUB201 
0 

1060 PRINT8229,N;:PRINT8237,N+l; 
:PRINT8245,N+2; 

1070 IF N=lTHENX»l:A=7:BDSUB2000 
1080 RETURN 

2000 FORY=10TO10+A:SET(X,Y,C2):N 

exty: return: 

2010 F0RX-1T063:SET{X,Y,C2):NEXT 
: RETURN 

2020 forx-itoki:set<x,7,cd:next 

: RETURN 

5000 'GRAPHICS REWARD 

5010 CLS0:FOR T-1T0RND(7)+3:C-RN 

D < 128) + 127 : B-RND ( 1 28 ) + 1 27 : S-RND ( 

3) 

5020 FOR M-1024TO1535STEPS:POKEM 

,C:POKEM+l,B:NEXTM,T 

5030 C-12S:FORM=1024TO1535:POKEM 

,c:next 

504 0 RETURN ^ 
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The Tooth Of Time 
Byte By Byte 

It's a real pleasure to see more educational programs 
becoming available for the CoCo. Unfortunately, many of 
these are either poorly written programs or are simply poor 
learning experiences. However, Crystal Software has put 
together a program that succeeds on both counts. With five 
modes, six skill levels, hi-res graphies and sound, Time 
Teacher is designed to teach youngchildren how to tell time. 

A menu gives a choice of five modes. Thef irstis a display 
mode showing both a traditional cloek face and a digital 
clock. All the hours and then all the minutes are shown on 
the two different clocks. This is basically a count-along- 
with-the-computer mode, 

The next two options are practice modes. In the second 
mode, the child enters a time into the digital clock using the 
keyboard. The computer then displays the time en the tradi- 



tional clock. In the third mode, the child sets the hands of the 
traditional clock with a joystick, The joystick is positioned 
as if it were a clock hand, the fire button setting first the hour 
hand and then the minute hand. The computerthen displays 
the same time on the digital clock. 

The last two options are quiz modes with skill levels. The 
fourth mode prompts the child to select the digits that 
correspond to a randomly set time on the traditional clock 
face. I n this mode, you do not have to enter leading zeros for 
single digit hours (example -04:30). Children can forget or 
become confused by those leading zeros, and this program 
wisely avoids them in the quiz mode. 

In the fifth mode, the child sets the hands of the tradi- 
tional clock with a joystick so that it matches the time 
randomly set on the digital clock. 

The quiz modes have six skill.Ievels which are incre- 
mented automatically after three correct answers are given 
in a row, The skill levels are: exact hours; half hours; 15- 
minute, 10-minute, 5-minute intervals; and all minutes. As 
students complete a skill level, they are rewarded with a 
flashing display and a star is placed on the screen. 

In both quiz modes, if students answer correctly, they are 
rewarded with sound and a smiling face on the clock. A 
wrong answer in a low buzz while the correct answer is 
displayed. To continue the quiz after a wrong answer, 
simply press any key. 

After or during a quiz, a detailed progress report can he 
printed on screen or on a printer. The report includes the 
child's name, the skill level reached, the number of times 
answered correctly, the total number of questions, a percent 
score and a weighted score. 

Of course, nothing is perfect. The program doesn't pro- 
vide an easy way to jump to higher skill levels for accom- 
plished students. The random times used in the quiz modes 
sometimes cause easy times to appear at the higher skill 
levels or the same time to appear repeatedly. So, a child 
struggling at one skill level can get a couple of easy or 
repeated times. The child will then be incremented to the 
next skill level and be lost there with no way to get back. A 
possible solution would be to add an automatic decrement- 
ing of skill levels after a set number of wrong answers. 

All in all, this is an excellent program for the home or 
classroom. Sound is used effectively throughout, neither 
overpowering the material, nor making wrong answers 
entertaining. Graphics are clear and the program is easy to 
use. Some adult guidance may be needed at first, but kids 
will quickly learn to use this program without help. 

(Crystal Software, 6591 »awsey Road, Rock Creek, OH 
44084, $15.95 on tepe) 

—James Ventling 



Him . . . 

Get The Most Memory 

YoucangetthemostmemoryavailableenyourCoCoby 
entering the command POKE 25,6:NEW. This, in effect, is a 
PCLEARG on your system. 

This eommand will not work with a disk installed. It will, 
instead, clobber the disk operating system. If that happens, 
simply RESET CoCo. 



RAINBOW POSTER 
NOW AVAILABLE 




Yes, it's here! A beautiful fult-color pos- 
ter of the cover of our January issue! 

This big (31x23) poster is printed on heavy 
poster paper and varnished to make it really 
shine. It is the perfect addition to your 
computer room and is available for only $5. 
There's even a small Rainbow logo in one 
corner. 

Send for yours today! There is only a limited 
supply, and when we run out, there won't be 
any more. 

Each poster is $5, plus $1.50 handling charge per order 
1q earns address In U S and Canada. Other points add $3. 
U.S. Currency only. VISA, MasterCard and American 
Express accepted. Mall to: Rainbow Poster, P.O. Box 209, 
Prospect, KY 40059 or call (502} 228-4492. 
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IF 'Program Control' THEN Fine 
ELSE GOSUB Confusion 

By Richard A. White 
Rainbow Contributing Editor 



Program control is nothing more than decision making 
and then taking appropriate actions after the deci- 
sion. To make a decision, the program must make 
some sort of test. The result of any single test a computer 
makes is either a true or a false Answer, Remember, it's a 
binary beast even when talking BASIC. If you had only IF 
THEN in your BASIC you still could write any program you 
wanted. Other control statements like FOR TO NEXT, 
ELSE, ONGOSUB&nA ON GOTO provide for simplicity, 
speed and efficient use of memory. We have used and com- 
mented on each of thesestatementsat one time or another in 
previous articles. Now is a good time to compare them and 
suggest ways to use them that you may not have thought 
about. 

IF A=B THEN 100. This is perhaps the simpliest of 
statements — it means just about what it says, IF A— B 
GOTO 100 is also acceptable BASIC and means the same 
thing. The 100 refers to line 100 in either case, If A does not 
equal B then the program goes to the next line in the pro- 
gram. If you need to go to a subroutine, then write IF A=B 
GOSUB 1000, 1 F A~B THEN GOSU B 1M0 works also, but 
why keep the unnceded THEN around to take up memory 
space? 

Any group of statements and functions may follow a 
THEN. For example, IF A=BTHEN CI S : PRINT A$ A : 
SOUND 100,10 : GOTO 100. For the actions following the 
THEN to take place it must be true that A=B. When it is 
false that A=B, you will want some other action. With 
ELSE, this action can be placed in the same line of code. In 
most eases this leads to program clarity and simplicity. Our 
example is IF A=B THEN CI S : PRINT AS A : SOUND 
100,10 : GOTO 100 ELSE CLS : PRINT "NOT EQUAL" : 
SOUND 50, 10. Note that colons are n»/used on either side 
of THEN and ELSE. If you want to waste memory you can 
put then in, they will do noihingclse f«r you. The ability that 
ELSE gives y«u to choose one piece of code or another is 
extremely powerful. Without ELSEyou would be reduced 
to using IF THEN mainly to route the program to lines 



(Richard While has a long background with micro' 
computers and specializes in BASIC programming. 
With Don Dollberg, he is the author of the TIMS data 
base management program.) 



where the needed code would be placed rather than execut- 
ing the code directly, This of necessity would locate the code 
remote from the text calling it. Program clarity is signifi- 
cantly reduced, speed is reduced and memory usage is 
increased. Instances when you will want to branch to remote 



"The ability that ELSE gives you 
ts choose one piece of code or 
another is extremely powerful. . . " 



lines are when you are going to major program routines or 
are going to subroutines used by other portions of your 
program. 

IFTHEN'sc&n be nested; that is, one following another in 
the same line with or without intervening code. Following 
are some lines 1 used a couple of columns ago, but reformat- 
ted to help show the relationships of the keywords to one 
another. 

IF (Test 1) THEN (if Test I is true) 

IF (Test 2) THEN (if Test 2 is true ACTION A) 
ELSE (if Test 2 is false ACTION B) 
ELSE (if Test I is false ACTION C), 
The second IF is inset under the first THEN that it fol- 
lows. Each ELSEh placed under the /Fthat refers to it. An 
ELSEwiU be related to the closest IF that does not have an 
ELSE. If the ELSE under the second IF were removed, then 
the remaining ELSE would automatically be associated 
with that /Feven though it is followed by code relating to the 
first IF. If you had no ACTION B in the event thatTest 2 is 
false, put the ELSE'm anyway so that ACTION C will occur 
when Test 1 is false. 
IF (Test 1) THEN (if Test I is true) 

IF ( Test 2) THEN (if Test 2 is true ACTION A) 
ELSE 

ELSE (If Test I is false ACTION C). 

You can test for many things after an IF. These include A 
less than B- A < B. A less than or equal B- A <= B, A not 
equal B- A O B, A greater than B- A >B,oi A greater than 
or equal B- A >=B. Of course both sides need not he 
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variables. A > 0 or B - 5 are quite acceptable. You can do 
the same tests on strings like A$ = "GOLIATH" or AS > 
"DAVID." Let's assume that A$ = "GOLIATH." Others 
might point out that David defeated Goliath and in that 
sense AS > "DAVID" is false. Old CoCo could care less 
about all of this and looks only at the ASCII values for "G" 
and "D." In ASCII terms, "D" is 68, "G" is 71, and 71 is 
bigger than 68. The matter is settled right there and "GOLI- 
ATH" is greater than "DAVID." If CoCo had to choose 
between "GOLIATH" and "GARP," it would go on the 
second letter to find a separation. 

Up to now things have been straightforward in that one 
test was made and one oranothcr action taken depending on 
whether that test proved true or false. Real life, even in a 
computer, is that a number of conditions need to be met for 
some action to take place. 1 FI can find $600 AND convince 
my wife that it is necessary, THEN I will buy a disk drive. 
Well, those who wrote our BASIC saw to it that we would 
havewayst* makedecisions based on a number of tests. We 
have already discussed one way. /FfTcst 1 ) 77/£'A'/F(Test 
2) THEN (Action). Alternately, this can be written IF (Test 
I) AND (Test 2) THEN (Action). In BASIC this might be IF 
A = B AND AS> "DA VID"THEN PRINT"SUBSCRIBE 
TO RAINBOW." To muddy the waters even more this will 
work— IF A = B AN D A* > "D A VI D" OR C> 22 THEN 
PRINT "SUBSCRIBE TO RAINBOW. "Seethe OR?. If C 
were the contents of your bank accountand it were greater 
than S22 then the message "SUBSCRIBE TO RAINBOW" 
would be printed irrespective of whether A = B or GOLI- 
A7H is greater than DAVID. Tests can be strung together 



with yCA'Dand OR in almost any conceivable way which 
makes them powerful tools in the programmer's bag of 
tricks. 

One useful application is enabling either upper or lower 
case input to eontrol program action. In the June 1983 
Rairthew, Mr. E4, a simple but powerful word processing 
program appeared. Its author, Hubert Samm, wrote it for 
generating and editing assembly language text files. As such, 
he had little need ever to use it in lower case and provided no 
way to input lower case commands. I came to discover that 
the Dugger C compiler that I had recently purchased 
required characters in the text file that were not supported 
by Telewriter. These are the back slash up arrow and the 
square brackets in particular. However, much of "C" is 
written in lowercase which made Mr. £c/difficult to use. So 
with some simple reprogramming, lower case came to Mr. 
Ed by ORing a lower case letter in each // statement. The 
edited lines of code are below for those who may want to 
enhance Mr. Ed. 

60 TIMER=0lC*="A" lC=l 
70 IFC«=»N'#RC*=*"n ,, GOSUB370 
80 IFC*=» I " ORC*= " i " GOSUB4 10 
90 IFC*="T"ORC*="f GOSUB4S0 
100 IFC*="D"ORC*="d"6OSUB460 



Heavy duty PRINTERS READY for the Color Computer! 

All set to fly! We set all connectors & switches to JUST PLUG IN AND WORK! ALL cables AND 
serial interfaces INCLUDED. Phone us toll-free 800-323-9790 to confirm discount price (we placed ad 
months ago!) in case it's fallen. 




Star Micronics Gemini-10/-15 
qual i ty 

Friction, tractor, bit-map 
Epson-compatible graphics, 
100 cps. 10" wide $449. 15" 
wide $599. Extra ribbons: $15 
per six. 



Mannesmann Tally MT 160 

qual 1 ty 

Word processing at 40 cps or 
160 cps good printing! 
Friction, tractor, bit-map 
graphics, up to 160 columns. 
Auto justification. $689. 



quality 

Impeccable daisywheel print 
at 16 cps, 2K buffer, 17-inch 
carriage, bidirectional, 10 & 
12 pitch. Just $789. SPOOLER 
BUFFERS AVAILABLE! 



FREE SHIPPING (regular UPS) with money order or 
certified or cashier's check over $100, otherwise add 
2% shipping (min $2). VISA/MC accepted. Phone 
800 323 9790 Illinois 312-295-6888. 



P.O 774, LAKE FOREST. LUNGS 60045 

tttttmtttttftttfttttttttttfftttttttt iittM 
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110 IFC*="F"ORC**"f "GOSUBA70 
120 IFC**"E"ORC*="e"6OSUB5A0 
130 IFC»»"X"ORC**"X"6OSUB620 
140 IFC**"R"ORC*="r"6OSUB6A0 
150 IFC*="L"ORC*»"1"GOSUB650 
160 IFC**"P"ORC**"p»GOSUB720 
170 IFC*»"(5"0RC*«"q"THENEND 
180 IFC*=" 6"0RC*«- g" GOSUB780 
190 IFC»*"CORC**"c"GOSUB870 
200 IFC**"U"ORC*»"u"GOSUBllA0 

210 IFC*="2"GOSUB1160 

211 IFC*»"K"ORC**"k"GOSUB1200 

212 IFC*-CHR*<9A)GOSUB1300 

213 IFC*="M"ORC*»"m"THENK*=TX*<CL) 
t GOSUB620 

217 IF C < 10 THEN C=C+1 S GOTO 70 



220 T*TIMER/60 1 PRINTT" SECONDS" 

Lines 60, 217 and 220 are my addition to time the speed of 
execution and are not to be changed or added to the Mr. Ed 
program. Also note in line 212 that I had to use CHR(94) 
rather than an up arrow, another character not supported by 
Telewriter. In this case it's no problem since BASIC fully 
understands CHR$(94). If you were to put the above code in 
the computer and run it, it would print 1 3 seconds(approx- 
imately) That is the amount of time to loop through the 
tests only 10 times. This is a worst-case-plus condition; it will 
take less than one tenth of a second to test and take action, 
Still, response time is the name of the game and I will 
propose a f ixlater. I initially used a FOR TO NEXTloopto 
eontrol the looping but changed to using an IF THEN 
construction for this article. C is the loop counter. It is 
initialized, C— I in line 60. In line 217, it is tested and incre- 
mented it less than ten and the program is sent back to line 
70 for another pass. The function is exactly the same as FOR 
TO NEXT, but a bit slower and not as memory efficient. 
Indeed, the logic is the same as FOR TO NEXT with the 
counter initialized ai the beginuing, and tested at the end. In 
both cases if the counter stays less than the ending count (or 
greater than FOR wc can loop down-count as well as up- 
count), the program loops back. 

As noted, FOR TO NEXT can be replaced with a simple 
IF THEN statement. So why use FOR TO NEXT? It's 
easier. All you and the program need to know about the loop 
are ri^ht up there in the line heading up the loop. FOR TO 
NEXTh faster since BASIC knows up front What you want 
and can use the most efficient machine language coding to 



Talk is Cheap! 



You want your color computer to talk, 
but how much will it cost? 
$50 . . . $100 . . . $200 . . . NOi 

HOW ABOUT $29«»? 

SPEAK UP!™ is a machine language 
Voice Synthesizer program for your 
TRS-80 Color Computer," It Is 
100% software. Nothing else to buy. 
Best of all, YOU can make 
basic programs talki 

16K and 32K versions on one cassette. 
Has text to speech capabi lity. 



*T.M. Tandy Corp. 



16k minimum 



It's easy to use, and will say 
virtually anything! 

Talk really is cheap! 2553? 

Reviewed in the April issue of Rainbow. 

COD orders, checks accepted - NO DELAY 
WE PAY POSTAGE 
1-800-334-0854, ext. 890 
Except North Carolina 



P.O. Box 3318 
Chapel Hill, NC 27515 
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gel ii done. In the IF THEN approach above, the basic 
interpreter never knows it is doing loops. Here is the basic 
syntax of FOR TO S TEP NEXT. 

FOR ( variable & initial value) TO (limit value) STEP 

(value). . . NEXT 

The initial value, limit value and step value may be posi- 
tive, negative, integer or decimal. Looping continues as long 

"In some listings, you will see the 
variable name after NEXT like 
NEXT C. . . The computer knows 
full well which variable it is dealing 
with and doesn't need the pro- 
grammer telling it. " 

as the variable remains less than (or more than) the limit 
value. Any of the following ait valid. 
FOR C = I TO 10 . . . NEXT 

FOR C - 132.769 TO 133.543 STEP .008 . . . NEXT 
FOR C = 1001 TO -732 S TEP -200 . . . NEXT 
FOR C = -1 TO -10 STEP -1 . . . NEXT 
FOR C = IE1 TO 1E35 STEP 9EI0 . . . NEXT 
FOR C = 0 TO 0 . . . NEXT 

With*ut STEP, BASIC assumed an increment of +1, 
which is a very typical case. Otherwise there is nothing 
special about STEPing. -lust make sure y»u STEP in the 



right direction to get from the initial value to the limit one. 
No matter what the values assigned, a FOR TONEXT]aop 
is always executed at least once. It is necessary for the 
program to get to NEXT before any test is made. In some 
listings, you will see the variable name after NEXT like 
NEXTC. No, you don't see it above. The computer knows 
full well which variable it is dealing with and doesn't need 
the programmer telling it. From a programming clarity 
viewpoint, some case can be made for documenting the 
WOT with its associated variable. 

BASIC stores the location of the start of the FOR TO 
NEXT loop on the microprocessor's stack in memory. 
When the program exits normally, these memory locations 
are cleared for other uses. When a FOR TO AT loop is 
abnormally exited, these memory locations are not cleared, 
There are occasions when early departure from a loop is 
needed. There are a number of ways to do this. When this 
done, there should be code to set the count variable to a 
number equal or higher than the limit value and follow this 
with a NEXT'm order to clear the stack. Here isan example. 

100 FOR C = 0TOX:lFY>Z THEN C = X : NEXT 
GOTO 200 

110 CODE IN THE LOOP 

120 NEXT 

130 ' CODE FOLLOWING THE LOOP 

There are times when it is not desirable to go through the 
loop even once. In our BASIC you must test the governing 
condition and jump around the FOR TO NEXTcmdc or 
abandon FOR TO NEXT writing your own loop control 



NEW 



KODOMO NO GO 



Get 5 in a row before your opponent. 19x19 playing 
matrix. This is the favorite relaxation game for Japanese Go 
players. Two-playerversion and 4 computer skill levels for 
one player; also Tic-Tac-Toe on the same tape. 
$19.95 32K Ext. Basic cassette only. 
$14.95 1 6K Ext. Basic. Three skill levels plus Tic-Tac-Toe. 
$ 8.95 16K Ext. Basic Tic-Tac-Toe only. 
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ALSO 



CO-EXISTENCE 



Successfully develop your country in a resource-limited 
world. Form a world government, sign treaties, go to war: 
anything goes. This is a two - to six - player game which 
combines computer and board play (boara and pieces 
provided). 

$24.95 16K Ext. Basic cassette on y. 



AND 



5 EXCITING GAMES 



Be a Cosmic Trash Collector, fight a mig hty space battle, or 
surround your opponent in Trapem — all this and more on 
one tape, The RAINBOW says, "Great fare for the family 
with young children." 
$15.95 16K Ext. Basic cassette. 
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with I F THEN. Here is one approach, 
100 A - 1 

105 IF A > X GOTO 150 
1 10 'LOOP CODE 



140 A=A+l:GOTO 105 

One reason for the need to do this would be if you were 
takinga series of strings apart, perhaps for printing fields of 
records. If the user had put no data in yet and X =0, but 
made the mistake of trying to print, a SN ERROR would 
greet their efforts as soon as the program tried to take an 
empty string apart. Now, no programmer wants a user to be 
greeted with aSN ERROR — ever. So constructions like the 
above are necessary now and then Some languages and 
dialects provide alternate statements like DO UNTIL that 
test first and then aet. What is most important is to know 
what the characteristics of your language are and use them 
to best advantage. The grass may look greener over the 
PASCAL fence. That does not mean it's better grass. And 
while we are at it, you should be aware that the same 
keywords may act differently in another language, IF 
THEN ELSE seems to be one of the few constants. 

The two other program eontrol statements in Color BASIC 
are ON Z GOS UB and ON Z GOTO, Z is a number starting 
with J which tells the computer to count to a specific line 
number listed after the GOSUB or GOTO and go to that 
line. Earlier 1 promised an improvement for Mr. Ed. Here it 
is. 



SOTIMER^CS^'A" 
60 FOR X=ITOl0 

80 B-INSTRfl, i 'NnIiTtDdFfEeXxRrLIPpGgCcUu2Kk 

1A",C$) 

90 ONB G#SUB 370, 370, 410, 410, 450, 450, 460, 460, 
470, 470, 540, 540, 620. 620, 640. 640, 650,650, 720,720, 
780, 780, 870, 870, I 140, 1 140, 1 1 60, 1 200, 1 200, 1 300, 
225 

215 IF C$="M"ORC$="m"THENK$=TX$(CL): 

GOSUB620 
220 NEXT:T-T1MER/60:PRINTT 
225 RETURN 

As before, there are some changes that were made to this 
code piece for timing purposes that should not be made in 
Mr. Ed, These include lines 50, 60, 220 and 225 above which 
should not be changed if you modify the program, Thiscode 
does the same thing as the IF THEN line we discussed 
before, but d«es it in one third the time. Further, it uses only 
360 bytes versus 716 bytes f»r the series of IF THEN state- 
ments. The INSTR statement in line 80 hunts through the 
string of characters trying to find a match for the character 
in C$. If it finds a match, the test is successful and it puts the 
count up the string in B. In ON B GOSUB the computer 
counts up line numbers to the numher in B and makes a 
suhroutinc call to that line number, For the timing text, I set 
C$="A" and put A at the end of the string in INSTR, 
INSTR sets B-31 and the 31st number in 90 is 225. The 
program goes to 225, returns and then goes on line 220 
where it finds the NEXT for another cycle. Obviously the 
1NSTR-ON B , . . technique is quite effective here. If you 
only had three or four characters or values to test, IF THEN 
would be prefer red. 

Now, I am aware that INSTR is n»t in Color BASIC, and 
those without Extended BASIC are out in the cold again. Not 
necessarily so. INSTR is a command for which a BASIC 
su broutine may be written as a substitute. Take heart, Color 
BASIC owners, and use the following. 

10 'SUBSTITUTE FOR INSTR. DEFINE A START 
LOCATION SL, A TARGET STRING TSS AND A 
STRING OF CHARACTERS, CS, TO SEARCH 
FOR IN YOUR PROGRAM AND DO 'GOSUB 10'. 
12 LT = LEN {TSS) : LC = LEN (CS) 
1 4 I FLC+SL>:LT THEN SL=0 : RETURN ELSE FS= 
MID$(TS$, SL, LC) : IF F$ - C$ THEN RETURN 
ELSE 14 

16 'IF CS IS FOUND IN TSS, SL WILL CONTAIN 
THE POSITION IN TSS WHERE C$ STARTS. IF 
CS IS NOW FOUND, SL WILL CONTAIN 0. 

To summarize, program control is accomplished with 
statements that perform one or more tests and take actions 
based on whether true or false results are «btained for each 
test. What action takes place depends on how the pro- 
grammer writes the statements. The control tools in Color 
BASIC are IF THEN ELSE. FOE TO STEP NEXT, ON 
GOTO and ON GOSUB. IF THEN ELSE is extremely 
powerful and could be used only without seriously limiting 
one's ability to write complex programs. The other state- 
ments provide for program clarity, speed and economy of 
memory. Each has its place, so serious programmers learn to 
use each to best advantage through in-depth understanding 
of each. 



LINE PRINTERS 



CENTRONICS 588 (used) serial 600 
Baud, 88 CPS with 4 pin DIN plug 

All prices F.O.B, Henderson, Tx. 
Terms: Cash, check or COD 
Tx. residents add 4% sales tax 

»• y— s »* 

LEADER SALES CORPORATION 

P,0. Box 1220, Henderson, Tx. 75652 

214/657-7800 after 6:00 P.M. 

Discounts available to CC clubs 
and volume buyers . 
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Software Review^— YZb 

Vocabulary Builder 
Gets Constructive Criticism 

By Dr. Charles H. Santee 

Vocabulary Builder from Computer Island deals with an 
importantarea of learningandis based on some good ideas; 
however, the program has much room for improvement. 
The program begins with a modest title page and there is a 
short pause while data is being read. You are then asked to 
give your name and to tell if you have a printer on. If you 
respond with "yes" or "Y" the printer prints "vocabulary 
words for" and the name entered. 

A page appears which is divided into several sections. The 
top part of the page identifies the number of words pre- 
sented and the level. This is followed by a short question to 
answer. Four answers are presented one at a time for a brief 
period while a tone plays and then all four answers are 
reprinted for viewing. The person using the program selects 
the letter in front of one of the answers. If the answer is not 
correct, the program plays a low tone and the correct answer 
is shown, A correct answer is greeted with a higher tone and 
the message "Correct" followed by the person's name. You 
are then given a message to press ENTER which takes you 
on to the next question. After 10 responses, the program 
prints the words needed for study on the screen and with the 
printer (if that option was selected). After five sets of 10 
words the program tells you that you have completed that 
set and shows the percent correct. 



The documentation states that the program is modifiable 
by the user and gives some short directions, You can pur- 
chase programs for three different levels (grades 3 — 5, 6 — 8 
and § — 12). The program does use a consistent method for 
entering information and answers. You would always 
respond by typing an answer and pressing ENTER. Each 
program in the series contains 200 questions and 1,000 
words. 

I am a teacher, but I don't claim to be an expert in 
teaching vocabulary. However, I feel the selection of ques- 
tions and responses was generally good. In all cases, there 
appeared to be a clear best answer. There were a few times 
that I feel the correct answer was an unusual nuance of a 
word. #n those occasions, deriving the meaning of the word 
from the correct answer may be somewhat misleading. 
However, this was an exception rather than the rule, 

The documentation does not mention what source was 
used to select the words used and how the level was deter- 
mined. 1 think this is important information that should be 
included. 

Now for the bad news. In Vocmlndmry Builder, questions 
are selected at random. This is generally a good practice in 
educational software. However, the specific application in 
this instance has an unfortunate result. Each question is 
selected at random from the entire list of 200 words. The 
question is then eliminated from the pool of questions so 
that you can be certain the same question is not given again. 
At the end of 50 questions, the program is RUN no that the 
entire pool of 200 words is again available. You might think 
that doesn't sound so bad. However, using this method you 
may /ww see all the words in the list. In fact, there isagood 
probability you could use the program a large number of 
times and miss some of the words. 

My next area of concern was the amount of memory used 
by this program. The program requires 32K of memory. In 
fact, with a disk drive installed, you need to PCLEAR I 
before RUNning the program. My own particular feeling is 
that this program is not worthy of that much memory use. 
Most of the memory is used by the list of words and 
questions. 

The easiest solution to both problems listed above would 
be to make four separate programs with 50 words each. 
Then all questions could be tested and the program would fit 
into a 16K machine. In fact, I would venture to say this 
program could be modified to work in 4K. I would recom- 
mend putting a series of smaller programs on one cassette. 
The user could master the words in one program and then 
progress to the next. I have another bcttersuggestion which 
I will outline at the end of this review, sodon't stop reading 
here. 

The Vocabulary Builder documentation outlines a brief 
description of how to enter data lines to modify the pro- 
gram. You need to enter a question, four answers, the letter 
of the correct answer, and the correct answer. The documen- 
tation states that you must keep the same number of items as 
the original program. If the documentation had shown how 
to modify the lines where variables were initialized, you 
could have easily set this program to accept data lines of any 
quantity desired. Second, the correct answer is given twice 
(once in the list of questions and againasthelastdata item). 
Since the letter of the correct answer is included, the pro- 
gram could have used this letter as a pointer to the answer 
and the last data item could have been dropped. This would 
mean that the program would need less memory and modi- 
fying the program would require less typing. 

1 believe that some of the other problems of this program 



Qsopt 

PRESENTS 

• 3D TtC-T AC-TOE . 

NEW'! Ove: 150 possible ways f# win. A real chtilenge. just 
when you think you won, coco beats you to it. A first for the 
coco. 

Cas&ette. 32K ECS $14.95 

Disc. 32K £C8. . : $19.95 

. TIOTACTOE . 

it you thought Tic-Tac-Toe isan easy game, try matching your 
wits zgatnx this, version. Ptay if with or ntihtvt jovsfteAs A 
spec/a/ "SMAI l FRY' /eve/ of dWculty is proved 

Cassette: W. C.B $10.95 

. JUMPS « 

Q-SOFVs chaHon.gjng version of a verytid European solitaire 
q&nit. An ADOtCTlVF board game in Hl-RES graphics. 
Reviews-din Jan. 1983 .ssus of the 'RAINBOW on page 164. 

Cassette- 16K E.C.8 $10.95 

Cassette: 4K C.S S 8.95 

• THE SPIDER • 
By CHR9MATIC SOFTWARE". All machine language. 
Annihilate the spider before he deshoys you Arcade action, 
joysticks needed. Reviewed in Jan 1983 Issue of the 
"RAINBOW on page TSO- 

Cassette: ?6,< $19.95 

. ONE CHECK . 

48 'CHECKERS" are plated on the two outside rows of a 

, i C I a ■ • i o - * "~l< kCrS jj 

l t ping diagonally. Pia c r * ""> t jo * * 
hl-RES graphics 

Cassette: 16K E C 3 ....... $10.95 

QSOFT /j «v 

»00a ftOWNHOOO DttME « PA>NESVIU£, OHiO 44677 ™Th) 

. : • ::ue s a* S3 00 Cw »« 3SS-SSTS 
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were due to an attempt to keep the program short so that a 
large number of items could be included. Since we have 
solved that problem, let's see how we might improve the rest 
of the program. The program uses a standard INPUT 
statement to accept data. This means that the CLEAR key 
will operate and a child could accidentally erase the entire 
screen. It would be possible to eliminate the problem by 
using an INKEY routine. The INKEY routine could also 
provide better protection for wrong responses. At the end of 
50 questions, the program accepted an ENTER to ayes/no 
question. I would like the program to only respond to the 
correct response of YES or NO (Y/N) or to give a message of 
help when wrong keys are pressed. 

When the programasks if the printer is on, a child could 
accidentally answer YES and the program would hang up 
looking for the printer. I would like a routine that would 
check the printer status. We don't need to give kids any 
hang-ups. 

At the end of 10 items, the list of items missed will show 
about seven items on the screen. If the child misses more 
than seven, the first few items scroll out of view. I would like 
to see a routine that would control how much is put on the 
screen at that point (ie, show seven missed items and lhen 
press a key to see the rest). 

Although not stated in the documentation, the largest 
question should be no larger than 28 characters. Second, 
each answer should be no larger than 14 characters. Data 
items larger than thisdonotfit into the format of the screen. 
With very little modification, this program could be used 
not only for vocabulary but for any multiple choice type 
question. However, even for vocabulary 1 would like to have 
twice as much space to write a question. The space for 
answers is adequate for most words, but I might like to add a 
phrase or two as an option for an answer, 

1 found the tone and response to each answer monoto- 
nous and after a while annoying. I would like to see more 
variety. Let's add a little Hash after 10 correct answers. The 
rate at which questions were presented was just a little too 




All Color Softwares 



Nem from A CS 



slow. The author chose to use a FOR- N EXT si&iemei\\. with 
a POKE of each memory location to make the background 
colors in certain screen areas. 1 believe printing a graphic 
string would have been quicker. 

In my opinion, this program did not make adequate use of 
the capabilities of a computer. The same thing could have 
been accomplished by using index cards with questions on 
one side and answers on the other side. 

Lei me give an example of what I would like to see in a 
program to develop vocabulary. This would work best with 
a disk, but would be feasible for cassette. The program 
would have all the questions and vocabulary words saved in 
several data files that were separate from the program. The 
program would caltup thefirstfile and test the student. Ihe 
items the child missed would be saved bmck to disk. The 
items the child didn't try would be savedasanother file. Ihe 
next time the program was used, the program would call 
back a few items the child missed ihe last time and add some 
new words. The program would progress in this fashion 
until all words were mastered. While we are mt it, let's 
measure how fast the child responds, how many items a 
child responds to in one sitting, and the classification *f 
words the child misses (ie, easy-hard or nouns vs. verbs). 
L& 's give the screen some animation and variety as the 
program ( and the child) progresses. Finally, why not include 
one printout for the child for feedback and review and a 
secon d that is activated by a teacher's code word or program 
for diagnosis of learning needs. 

In conclusion, I felt that Vocabulary Builder dealt with 
important subject matter, had a few interesting features 
(such as printing words missed) but was generally quite 
disappointing. 

(Computer Island, 227 Hampton Green, Staten Island, N¥ 
10312, 32K, three levels at $19 JS each) 



f=»oi»t Qf^icw Box 13233 
Plantation, Florida 
33318 



RS232 SWITCHER *»=3fa„G9G3 



Tired of changing peripherals, plugging and unplugging 
cords? Don't have enough cable to reach the printer or modem? 
Tired of paying more for the other guy's products??? Then 
ACS is ready to help you!! Our new 2-plug RS232 switch box is a must 
at only *30.00!Mi and our extension cables are as reliable as 
ever at only $10.00! ! 

Sound great?? Well, here's the beat part! Our products are 
LESS! !! Don't wait, order now!!? 

RS232 Switch Box 430.00 Add S3. 00 shipping 

Extension cable < 10 feet) . .S10.00 To all orders. 

C Printer , Modem, or Cassette) 



Florida residents add 5*/, sales tax. 
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Software Review " ^ 

Match & Spell Sparks 
Enthusiasm For Learning 

Does your child need some improvement in spelling 
skills? Perhaps he or she has lost interest in that old spelling 
list program you wrote. If so, spark up some new enthusiasm 
for learning and let the kids play Match A Spell on their 
favorite computer. Kids will tsk to practice their spelling 
words once they have played this educational game! 

Did 1 say game?The kids in our house and neighborhood 
think it's a game. My kids, age four, six, and nine, are really 
excited about Mmich & Spell. This program very nicely 
incorporated the TV matehing game of Concentration with 
a spelling drill of up to 20 words. Each word in the list can be 
up to 11 characters in length. The object of the game is to 
collect squares by matching up the hidden graphics. The 
educational objective is to improve spelling skills, and my 
kids have had fun doing both. 

After CLOADxng Mmtch & Spell, you can watch the title 
page write the words "match and spell." From then on, the 
program very effectively prompts you to do everything you 
need todo. By the way, the documentation is very clear and 
well written, from the general setup of the program to the 
thorough description of the game play and what to expect as 
the game proceeds. 

You start off by loading the word list, either from the 
keyboard or from a tape file you may have created before. 
The program comes with a sample spelling list to get you 
started. However, the ('LIST') is at the very end of the tape 
after three program saves. So if youdont know where it is 
you have to wait and wait. Creating your own word list is 
very easy through the program prompts and includes a 
chance to change a wrong spelling or change words entirely 
before saving to tape or using them in the program. 

On»e the word list is entered, the words are displayed in 
twocolumns for you to studyaslongas you want. When you 
are ready the game begins. The game prompts you for two 
players' names, although one person could play both posi- 
tions. A new screen appears with 12 numbered blue squares. 
Each player, in turn, chooses two squares in an effort to 
match two with the same hidden graphics. If those two 
squares match, the program randomly selects one of the 
words from the list and presents it to you either correctly or 
misspelled with a common spelling error. For example, 
('computer*) might be presented asOcom put or.') If this ques- 
tion is answered correctly, the word is removed from the 
screen and the play er is required to type it in correctly, being 




giv en three chances to do so. If heis unable to spell the word 
correctly, he forfeits these two squares and his turn. If a 
wrong answer is given to the previous question, the player 
also loses his turn and the squares he had just matched are 
turned around and become available for the other player if 
he can correctly match and spell the next word chosen. 

If a right spelling is given, then the matched squares are 
colored in with that player's color and the player is given 
another turn. Play continues until all 12 squares have been 
matched. Chances are you would have to play the game at 
least twice to cover a full spelling list. At theendof the game, 
the program lists any words thata player had difficulty with 
and gives you the option of continuing another game with 
the same word list or using a new list. 

I think Match & Spell is an excellent program and pro- 
vides a well balanced and effective intermingling of play 
time with spelling drills, in contrast to some spelling/ math 
drills which require you to reach a certain performance 
before being rewarded with play. 

It was also noted in the documentation that the random 
misspelling of the words works best on wordsof five or more 
letters. I found this to be true. The program runs well and is 
very easy to use, {My, wife wanted me to be sure and say that, 
as she has commented that Match A Spell is one of the 
easiest programs she has had to help the y ounger kids with 
when I'm not home.) Younger children, around age six and 
under, may need some help and guidance to read the 
prompts, etc. at first, but they catch on fast! The word list 
can be changedreadily to accommodateappropriate vocab- 
ulary. For my youngest daughter, age four, we used words 
like family members' names, her name, dog, cat, etc. 

It may take longer to go through a spelling list using 
Match & Spell, but the kids think it's neat and really enjoy it. 
Plus, there is no "Awww. Do I have to practice my spelling 
now?" 

Documentation is complete and well written. Really, the 
only criticisms I had was having to wait so long for the 
sample list to load and waiting during the delay time 
between screens after you've made a match and while the 
computer is selecting a word and misspelling it. 1 1 bothered 
me slightly, but the kids apparently didn't mind as they have 
never mentioned it. 

If you are the programming type you might consider 
adapting this program to math drills. 

This educational game is for all ages (including mom and 
dad). Match & Spell requires I6K Extended Color BASIC. 

(Harntonycs, P.O. Box 1573, Salt Lake City, UT 84110, 
$11.95 tape) 

—Kenneth D. Peters 



How To Clear All Graphics Pages 

You can clear all your graphics pages — and thus 
increase free memory — by entering the following 
command: POKE25,6:NEW. If you do this, you will 
not be able to use graphics pages, but you will have 
more program memory. 

Caution: Do not try this POKE with any program in 
memory. It will destroy whatever program is resident 
in the ROC. 
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USING THE 

COLOR 
COMPUTER 

TO DEVELOP 

COMPOSITION 
TOPICS 

By Stephen N, Tchudi 



As a teacher of school and college writing courses, I 
have been somewhat disappointed by the computer 
software programs that have been written for my 
field. Whether produced by major educational publishers, 
the computer manufacturers, or basement hobbyists, pro- 
grams designed to develop language seem to me inordinately 
concerned with drill in so-called "basic skills" — particularly 
grammar, vocabulary and spelling. Now a computer ean do 
that sort of drill very effectively, probably more effectively 
than an English teacher and with a good deal more pizzazz. 
But using a computer principally for drill seems to me to 
ignore its much broader potential for aiding youngsters in 
developing their language skills. Further, the bulk of ed uca- 
tional research suggests that drill, even when done well, is 
not the best way to get students to use language more 
effectively. Language is a "learn by doing 4 ' skill; the more 
people use it, the better they become at using it, 

Sinee buying my CoCo a little over a yearago, I have been 
studying language programs and exploring ways to use the 
computer "creatively" to help students learn to write. The 
program presented here — I call it "The Write Idea," but 
"The Wryte Idea" might be better — is intended to help stu- 
dents from the middle grades through adulthood solve one 
of the biggest barriers to successful writing: finding some- 
thing to say. 



(Stephen Tchudi is a professor of English at Michigan 
State University, where he directs the English Educa- 
(i*n Frmgram. He is a member of the Lansing, Michi- 
gan Color Computer Users Group.) 



Most noviee writers undervalue their own experience and 
fail to realize that they have hundreds and hundreds of 
potential writing topics in their memories. "The Write Idea" 
helps a student get some of these ideas out of his or her mind 
and down on paper. 

The program is written for a 16K CoCo and uses a Line 
VII printer. As the student answers questions flashed on the 
monitor, the printer springs to life, writing down the 
answers in the Line Vll's CHRS 31 boldface for dramatie 
effect. (The answers simultaneously appear on variously 
colored monitor screens.) The printer also adds headings, 
formats the answers, and throws in some asterisks to high- 
light the student's ideas, 

The program is written in two parts: Part I helps the writer 
list a number of potential topics and select one to write 
about; Part I J has the studentde velop specific ideas as a way 
of "pre-writing" and planning the paper. In a twenty to 
thirty minute run-through of the program, a student will 
characteristically produce a three- to five-foot printout, end- 
ing forever the complaint that English tcaehers hear sm 
often, "1 haven't got anything to write about.'' 



Parti 

Lines 5 130 clear string space and present the program 
title. 

Lines 140 290 explain the aim of the program, ask the 
student's name and instruct him/ her to turn on the printer. 

Lines 300 1 190 ^uiz the writer about past experiences, 
asking him/her to "peek and poke" in memory to recall 
"Firsts" (first love, first pet, first day at school [lines 300 
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CHROMA 



EUCHER!- 



A Hi-Res version of the card game. Your partner is 
tr. the opponent team is played by the computer. Allows 
»y o» the tour players to"<SO" alone. 



S19.95 J 




UTILITIES • 



CCADS — A lull 6(309 machine language monitor with lire assembler 
and disassembler All you need to debug machine language programs. 
(ML, 16k or 32k) ^ 

Cassette $19,95 or Disk (With Source! -P $23,95 

UNLOCK — A complete alsk backup utility. Features included are 
initialization of any lrae< copy any track ana correct !/• errors or leave 
(hem irtiact; andverify any traek Track numDers up to track 90 may »« used 
8l any time. 

(MC, 16k or 32k) ^ 

Disk (With Source) . . $24.95 

CHROMA-KEYS - Qe««e tunat.on keys ana save tnem t* disk or 
cassette 

(ML, 16k or 32k) A 

CasBen e $9. 95 or Disk ( wit h Source) twr. $ 1 3.95 

SPOOLER — Print ASCII files from disk without waiting. 
(Ml, 16k, 32k. or 64k only) 

Cassette $11 .95 or Disk (With Source) $15.95 

COMMAND — Add machine language programs as commands to 
BASIC 

(ML, 16k or 32k) 

Cassette $15.95 or Disk (With Source) $19.95 



•GAMES- 



PROSPECTOR — An ECB Hi-Rea graphies game. Can yougei thegold 
out of the mine? ^ 
(ECB,1Skor32k) S 

" - $7.95 

in of sn ancient strategy game, 
$7.95 



JUMP-A-PEG — a Hi-Res v« 
(EC8,16kor32k) ^ 



MISCELL NEOUS 

CLOCK — A software real-time clocx program for the CoCo. Warn na: 
Triecloc* wnlatop dunng tape I/O 
(ML, 16k or 32k) 

Cassette S9.95 or Dtak (WHh Source) *3 $13,95 

DARKROOM DATABASE — Throw away yourPhoto-U* index. Let 
CoCo look up the facts. Darkroom Data-Base with limer. 
(Disk, 18k or 32k) 

Disk $19.95 



6 1 0]), "Celebrations"(birthdays, Christmas/ Chanukah, Val- 
entine's Day [lines 620—950]) and "Events" [lines 960— 
II90], 

Lines 1 200- 1 420 then ask the student to examine the 
printout and to select a w best"topic to write about, Students 
should also save the printout for future reference. Typically 
a student will create more than one and possibly dozens of 
potential writing ideas, each of which can be developed 
separately through Part II. 

Lines 1 430 end give the student the option of plunging 
directly into drafting a paper or, if more preparation is 
needed, moving on to Part II. 

Part II 

Lines 2000 — 2I90 introduce this portion and ask the stu- 
dent to re-identify him or herself, turn on the printer and 
enter the topic that has been chosen. 

Lines 2210 2310 have the student describe the general 
idea of the topic. 

Lines 2320 — 2840 ask the writer to brainstorm f or details 
about the topic, including Sights [2340—2450], Sounds 
[2460—2540], Other Senses [2550—2640], Actions [2660- 
2680] and People [2760 2840]. 

Lines 2850 — 3020 focus on the audience or intended 
readership of the paper. Who will read it? What does the 
writer want them to understand? 

Lines3030 32l0ask the writer to jot down some senten- 
ces that can be used as a possible beginning, middle and 
ending. 

Lines 3230 — end conclude the program by pointing out 
that the writer has, in effect, planned the entire paper, that 
the only remaining task is d rafting. The text of the program 
also reminds the student that people, not computers, write 
papers; that thete is no electronic substitute for a writer. 



The model provided by "The Write Idea" can be modified 
to treat virtually any kind of writing, from exposition and 
argument to letter writing or even creative writing. Unlike 
drill programs, it does not insist on "right" answers; rather, 
it uses the computer as a stimulus to creativity and as an 
electronic notepad. I believe programs like it deservea plac* 
in the computer-oriented language laboratories springing 
up in schools and colleges all over the country. I hope such 
programs will replace the "old wine" of skill-and-drill pro- 
grams with a rieher vintage more appropriate to the new 
hottle of the Color Computer. 



W ISO- 



ISO 01E4 

390 04DE 

810 074F 

880 JDA6E 

,. . , 1110_0CE6 

Listing 1: 1400 102E 

3 CLEAR 2000 END_12EO 
10 CLS 

20 PRINT 8 97, "THE W R I 
T E IDE A": PRINT 
30 PRINT @ 166, "'FINDING SOMETHI 
NG TO" 

40 PRINT © 202, "WRITE ABOUT" 
30 PRINT @ 229, "FROM PERSONAL E 
XPERI ENCE* " 
60 PRINT! PRINT 



CHROMA- SYSTEMS GROUP 



140 thcRAlNBOW September 1SS3 



70 PRINT m 330, "VERSION 1.4" 

80 PRINT m 336, "COPYRIGHT CO 1 

9B3" 

90 PRINT S 392, "STEPHEN TCHUDI" 
100 PRINT ft 423,"#*THE INKBYTE** 

110 PRINT 9 435, "2011 PAWNEE TRA 
IL" 

120 PRINT 9 4G3, "OKEMOS, MICHI6A 
N 48864" 

130 FOR T» 1 TO 5000: NEXT T:CLS< 
3) 

140 PRINT "LOTS OF PEOPLE HAVE D 
IFF I CULT Y FINDING SOMETHING TO 
WRITE ABOUT." 
150 GOSUB 1530 

160 PRINT "THIS PROGRAM WILL HEL 
P YOU FIND IDEAS IN YOUR OWN EXP 
ERIENCE. " 
170 GOSUB 1530 

180 PRINT "ALL YOU HAVE TO DO IS 
PEEK AND POKE IN YOUR MEMORY T 
0 RECALL INTERESTING EVENTS AN 
D PEOPLE." 
190 GOSUB 1530 

200 PRINT "THE COMPUTER WILL ASK 

YOU A FEW QUESTIONS. M 
210 GOSUB 1530 



220 PRINT "PRESS <ENTER> WHEN RE 
ADY": INPUT G*:CLS(6> 
230 PRINT 

240 PRINT "WHAT IS YOUR NAME?": I 

NPUT NAME* : PR I NT 

250 PRINT "OK, " NAME* 

260 FOR T»l TO 500: NEXT T: PRINT 

270 PRINT "TURN ON YOUR PRINTER. 

280 PRINT: PRINT "PRESS <ENTER> 
WHEN THE PRINTER IS ON." 
290 INPUT T*:CLS(5) 
300 PRINT "WE'LL BEGIN WITH A CA 
TEGORY CALLED:" 
310 FOR T»l TO 500-.NEXT T i PR I NT 
320 PRINT " **FIRSTS* 
* " 

330 GOSUB 1530 

340 PRINT "THINK OF SOME OF THE 
'FIRSTS' INYOUR LIFE:" 
350 GOSUB 1540 

360 PRINT " FIRST LOVE OR F 

IRST KISS" 
370 GOSUB 1540 

3B0 PRINT " FIRST PET FI 
RST DEATH" 
390 GOSUB 1540 

400 PRINT " FIRST DAY AT SCHOOL 



GRAPHIC MATH 
ADVENTURE $21.95 

Challenging Adventure! Fully player sele. 



0 300-t 




obllacles which can be Overcome by correctly answer ing main prt>h. 
" mt - Any one Of all (ourlur>cliOnS(+.».>..)tafi»>c>tl«lr<In»«Hlvirieiy. 
21 tkil! Sc^tU mnU' ihr piOtc crwllrftfint in, .11 aitcs. 

m ext basic- lu-nuiroi 



BACKUP MASTER/ 
GRAPHIC MONITOR 



$25,95 




a. wa *Mt» 

{»(HJM»»« fm f „ E6 CATALOG 

I ACM 3%w «hWno - No COO 



410 GOSUB 1540 

420 PRINT " FIRST REMEMBERED NI 

GHTMARE" 

430 GOSUB 1530 

440 PRINT "OK, GOT THE IDEA?" 
450 GOSUB 1530 

460 PRINT "PRESS <ENTER> WHEN RE 
ADY": INPUT G*: CLS(0) 
470 PRINT 

4B0 PRINT "NOW LIST ONE OF THE ' 
FIRSTS* IN YOUR LIFE. THEN PRESS 

<ENTER>. " 
490 PRINT 
500 INPUT S* 

510 PRINT #-2, CHR*'31>? "SOME ' 
FIRSTS' IN THE LIFE OF ": PRINT 
#-2, NAME*: PRINT #-2 
520 PRINT #-2, 41 ***" S*: PRINT 
#-2 

530 PRINT: PRINT: PRINT "GOOD" 
540 GOSUB 1540: CLS(0) 
550 PRINT "NOW LIST ANOTHER FIRS 
T IN YOUR LIFE. <ENTER> (IF YO 
U'RE OUT OF 'FIRSTS', PRESS <XXX 

ENTER>. ) 
560 PRINT 
570 INPUT S* 

580 IF S*<""XXX" THEN 620 
590 PRINT #-2, " ***" S«: PRINT 
#-2 

600 PRINT: PRINT: PRINT "KEEP GOIN 
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G":for t - i to 300: next t 

610 GOTO 540 

620 PRINT "OK, " NAME*: PRINT "LE 

T'S TRY ANOTHER CATEGORY" 

630 FOR T=l TO 900: NEXT T:CLSC2) 

640 FOR T-l TO 200: NEXT T: PRINT 

650 PRINT "**CELEBRAT 

IONS**" 

660 GOSUB 1530 

670 PRINT "LIST SOME OF THE MOST 

IMPORTANT CELEBRATIONS IN YOUR 
LIFE." 

660 FOR T = 1 TO 1000: NEXT T:PRI 
NT 

690 PRINT ■ FIRST REMEMBERED BIR 
THDAY" 

700 GOSUB 1340 

710 PRINT " OTHER BIRTHDAYS UN 

BIRTHDAYS" 

720 GOSUB 1540 

730 PRINT " CHRISTMAS 

CHANUKKA" 
740 GOSUB 1340 

750 PRINT " JULY 4TH VALEN 
TINES DAY" 
760 GOSUB 1540 
7B0 GOSUB 1540 

790 PRINT " ? ! ? GROUND HOG'S D 



AY ! ? !" 

600 GOSUB 1530 

S10 PRINT "OK? PRESS <ENTER> NHE 

N READY. ": INPUT G*:CLS(S> 

620 FOR T - 1 TO 500: NEXT T:PRIN 

T 

630 PRINT "NOW LIST ONE OF THE C 
ELEBRATIONSIN YOUR LIFE. THEN PR 
ESS <ENTER>" 
640 INPUT P* 

650 PRINT #-2, "CELEBRATIONS IN 
THE LIFE OF":PRINT «-2, NAMES: PR 
INT «-2 

S60 PRINT •-2," »»»" P*:PRINT 
•-2 

870 PRINT: PRINT: PRINT "THAT GETS 

YOU STARTED" 
660 GOSUB 1540: CLSCS> 
690 PRINT "NOW LIST ANOTHER CELE 
BRAT I ON IN YOUR LIFE. < ENTER >" 
900 PRINT: PRINT "(PRESS <XXX ENT 
ER> IF YOU'RE OUT OF IDEAS." 
910 INPUT P» 
920 IF P*-"XXX" THEN 960 
930 PRINT •-2," ***"P«: PRINT • 
-2 

950 GOTO 660 

960 CLS«2> :PRINT: PRINT "LET'S D 



The C olor Computer 
Word Processor! 



MASTER WHITER (we changed our r 

Sionel quality ful 



ie from WOROMASTERH* a protee- 



to ok at what you get. 

MASTER WRITER'S FULLSCREEN-ORIENTED EDITORallowsyouto move 
lhecur»s>r enywhere in your text using the up, down, right and lelt arrows. Do this 
oneeheraeter at a time or bylineorpage. Insert, deleteorrepiaceteit at the cursor 
watching your changes as you make them. Delete or rnoveblockaottext from one 
place toanother. Merge In text from other Wee 

AUTOMATIC CARRIAGE RETURN alter laat complete word on each line; with 
this and AUTOMATIC PAGE FEED you don/I have to worry about where* line or 
page end* — jusl typet 

MASTER WR1TKB rune ona 16K, 32*. or64«eolcroomputer, letting advantage 
of all evellabie memory. Una il with DISK OR CASSETTE baaed systems. EX- 
TENDED BASIC IS NOT REQUIRED tor cassette version. 

EASTTO UNDERSTAND MANUAL has youcomfortebly uelng MASTER WRI- 
TER m minutes. It IS a USER-FRIENDLY MENU-DRIVEN SYSTEM with single 
letter commend*. Check any command without having to refer to the manual with 
IheHELPSCRKN. 

10 PROGRAMMABLE FUNCITON KEYS allow easy insert* 
used words or phraaea 



WORKS WITH ANY PRINTER. Take lull advantage of your prlntefa special 
(unctions such as variable characterslze and emphesbed characters with EAST 
EM BIDDING OF PRINTER CONTROL CODES. 

GLOBAL SEARCH function I tig you <?uicWy locate so 



m letters or standard text witl 
Just "Ml in the blanks' when your printer pauses (ore personalized appearance. 

LIMITED MULTI-TASKING leature lets you print one file while editing ano- 
ther. 

In addition 10 regular tent you can use MASTER WRITER to CREATE BASIC 
PROGRAMS with the convenience Of lull-screen editing. It can also be uaed to 
make ana- edit simple MAILING USTS. 

OTHER FEATURES include easy Betting of left, right, top and bottom margin, 
printer line width, end tinea per page. Also repeal keys, auto line centering, auto 
page numbering and enolofl of display color formats, 

TO ORDER send $29.95 lor cassette version or $34.95 for disk version plue 



MILL ST., SANTA MONICA, CA 90406 (21 3) 399-2222. 



MASTER WRITER lilt! ST' 9 
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0 ONE MORE CATEGORY. " 

980 FOR T - 1 TO 230: NEXT T:PRIN 

T 

990 PRINT " **EVENTS 

# # " 
1000 BOSUB 1530 
1010 PRINT " OR" 
1020 BOSUB 1530 

1030 PRINT " ##HAPPENI 

N Q S * * * 
1040 BOSUB 1530 

1050 PRINT "BY NOW YOU KNOW THE 
SAME, 80 BE-GIN LISTING IMPORTAN 
T EVENTS IN YOUR EXPERIENCE." 
1060 BOSUB 1530 

1070 PRINT "TYPE IN AN IMPORTANT 

EVENT": PRINT 
1080 INPUT E* 

1090 PRINT #-2, "EVENTS IN THE LI 
FE OF"! PRINT #-2, NAME*! PRINT « 
-2 

1100 PRINT #-2, " »»»" E*:PRIN 
T #-2 

1110 BOSUB 1540: CLS (2) 
1120 PRINT: PRINT "OK, " NAME* 
1130 PRINT: PRINT "NOW LIST ANOT 
HER EVENT": PRINT 

1140 PRINT "PRESS < ENTER > WHEN F 



INISHED": PRINT 

1150 PRINT "IF YOU'RE OUT OF IDE 
AS, PRESS <XXX ENTER >" 
1160 INPUT E* 

1170 IF E*» "XXX" THEN 1200 
11B0 PRINT #-2, " ***"E*:PRINT 
#-2 

1190 BOTO 1110 
1200 CLS(4> 

1210 PR I NT: PR I NT "THAT'S THE END 

OF THE IDEA BATH-ERI NB. ": BOSUB 
1530 

1220 PRINT "NOW LET'S PICK A TOP 
IC TO WRITE ABOUT.": BOSUB 1530 
1230 PRINT "TAKE A LOOK AT YOUR 
PRINTOUT. "" 
1240 BOSUB 1530 

1250 PRINT "WHICH OF THE IDEAS 0 

N THE PRINT-OUT ARE MOST INTERES 

TINB TO YOU?": BOSUB 1530 

1260 PRINT "PRESS <ENTER> WHEN R 

EADY TO PRO-CEED. ": INPUT B*:CLS< 

4) 

1290 CLS (4) 

1300 PRINT: PRINT "OF ALL THOSE I 
DEAS, WHICH ONE IS THE MOST APPE 
ALING TO YOU?"! BOSUB 1530 
1330 PRINT 

1340 PRINT "IT WILL MAKE A GREAT 

WRITINB IDEA!": BOSUB 1530 
1350 PRINT "TYPE IN THE TOPIC": 
PRINT 

1360 INPUT T* 

1370 PRINT #-2, CHR*(31)5 "THE T 
OPIC SELECTED BY " NAME* " IS:" 
1380 PRINT #-2: PRINT #-2, " 
" T* 

1390 CLS(4):PRINT "BOOD, " NAME* 
1400 BOSUB 1530 

1410 PRINT "THE TOPIC YOU'VE PIC 

KED is:" 

1420 BOSUB 1530 

1430 PRINT " "T*: BOSUB 1530 

1440 PRINT "YOU MAY FEEL READY T 

0 WRITE ABOUT IT RIBHT NOW." 

:QOSUB 1530 

1450 PRINT "IF SO, SAVE YOUR PR I 
NTOUT,": BOSUB 1540 
1460 PRINT » POP IN THE WORD 

PROCESS I NG CARTR I DBE , *' : BO 

SUB 1540 

1470 PRINT " AND START 

DRAFT I NS. " : BOSUB 1 5 30 
14B0 PRINT "IF NOT, PRESS < ENTER 
>": INPUT B*:CLS(4) 

1490 PRINT "IF YOU WANT MORE HEL 
P BEFORE WRITING, ": BOSUB 1530 
1500 PRINT "LOAD THE NEXT PROBRA 
M ON THE CASSETTE.": BOSUB 15 
30 



COLOR-FORTH 

Including 5E HIGRAPHIC-B EDITOR 
+ UTILITIES 

-Di sk and Tape ut i 1 i t i es 

-Boot from disk or tape 

-Graphics and Sound commands 

-Printer commands 

-Auto-repeat and Control keys 

-Fast task multiplexing 

-Unique TRACE -function in kernal 

-Clean INTERRUPT handling 
in HIGH-LEVEL FORTH 

-CPU CARRY FLAG accessible 

-Game of LIFE demo 

-ULTRA FAST J written in assembler 

-Directions included for 
installing optional ROM in 
disk controller or cartridge 

-Free Basic game "RAT MAZE" 

FORTH 

Hoyt Stearns Electronics 

4131 E CANNON DR. PHOENIX, ARIZONA 85028 
602-996-1717 
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PRESS < BREAK >." 
TYPE <NEW ENTER 



3. PREPARE RECORDE 



1501 PRINT " 

1502 PRINT " 

>" 

1503 PRINT " 
R TO <PLAY>* 

1504 PRINT " 4. TYPE <CLOAD **1 
DEAS 2 " ENTER >- " 

1510 PRINT • 426, "•♦THAT'S ALL 

FOR NOW" 

1520 GOTO 1520 

1530 FOR T - 1 TO 1500:NEXT T!PR 
INT: RETURN 

1340 FOR T-l TO 1000: NEXT TIRETU 
RN 



W 217C 



Listing 2; 



2170 0263 

2340 05C2 



-14CA 



2000 CLEAR 2000 
2010 CLS 

2020 PRINT 6 97, "T H E W R I 
T E IDEA" 
2030 PRINT 8 172, "PART TWO" 
2040 PRINT ® 225, '"DEVELOPING Y 
OUR WRITING IDEA'" 
2050 PRINT @ 330, "VERSION 1.3" 
2060 PRINT 9 358, "COPYRIGHT (C) 
1983" 

2070 PRINT • 392, " STEPHEN TCHUD 

I" 

20S0 PRINT @ 423,"»*THE I NKBYTE* 
»« 

2090 PRINT e 455, "2011 PAWNEE T 
RAIL" 

2100 PRINT @ 485, "OKEMOS, MICHIG 
AN 48864" 

2110 FOR T - 1 TO 5000: NEXT T:CL 
S(5) 

2120 FOR T = 1 TO 500: NEXT T 
2130 PRINT: PRINT "I REGRET TO SA 
Y I HAVE FORGOTTENYOUR NAME.": GO 
SUB 3430 

2140 PRINT "PLEASE ENTER IT A6AI 
N": PRINT: INPUT NAMES : GOSUB 3430 
2150 PRINT "THANK YOU, " NAMES :G 
OSUB 3430 

2160 PRINT "IN OUR LAST EPISODE 

YOU PICKED AWRITING TOPIC. PLEAS 

E LIST THAT TOPIC:" 

2170 PRINT: INPUT TS:CLS(5) 

21B0 PRINT "THANKS AGAIN. ": PRINT 

I PR I NT "PLEASE MAKE CERTAIN YOUR 

PRINTER IS TURNED ON. ": PR I NT 
2190 PRINT "PRESS <ENTER> TO PRO 




compu*sette 

TAPES & DISKS 



100% ERROR-FREE 
FULLY GUARANTEED 




Compu-selfe, a product oi MICRO 80 INC, 



The Micro-Trac rM Generation 



CASSE TTES 

C05 

CIO 

C-20 

C 30 

Custom Cases 




— UPS SHIPPING — 

(No, P.O. Boxes please) 
$3 00 per pack 
— Canadian snipping multiply by 2 — 

No. 1 Magnetic Media in the USA! 

— Write for volume prices — 



TOLL-FREE 

(orders only) 
r—^i 1-800-528-6050 /C^^ 
W2&^ ext. 3005 ^ "•'•;•. > 
I" Arizona Stale ' "V 

1-800-3520458 
ext. 3005 

MICRO-80™INC. 

E 2665 Busby Road 
Oak Harbor, WA 98277 
1(206)675 6143 
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IWLS NEST 

SOFTWARE 

WE GIVE A HOOT 



.„ complete this in 3# 

days. If you can we will sen«l you any cassette program we 
sell at n» charge. (We will even pay the postage.) You start 
on a disab! d sub, near tke lost city of Atlantis. Your, ob- 
ject is to get the sub and yourself safely to the surface. 
Your text adventuie tape will have a 16K EXT version on 
one side and a 32K EXT version on the other. 
ATLANTIS Cassette - Postpaid 



$21.95 



PROGRAM FILE 



You can search, sort, modify, delete and display 01 
or printer. Sorting may be done by name, type, or location. 
You may sort on all three fields with a single sort. 
Cassette 1 6K EXT - Fostpaid S 1 4.95 



LABEL III 

. Develop and maintain a mailing list. Print lists or labels in 
* ymirchoio* mf 1 , 2 »r 3 wide. Supports 3 or 4 tine addresses 
with phone optional. Fast machine languages^rt on last name, 
first name, or zip code. You may sort on alt three fields with 



t singles 
Cassette 16K EXT - Postpaid 



$19.95 



NEW!! 

Now you can add a little light and extend your coco's life. 
Don't leave your coco on and fey your chips. Put some lite 
in vour coco's life. "•WLS EYE" indicator light, plugs into 
ekfier joystick port and may he mounted beside your key- 
board where it is easily -visible. It will glow BRIGHTLY when- 
ever your coco is on. Very simple H second installation' 
"OWLS EYE" Postpaid $8,95 



{ly Dynamic M«wir*nSe*) Designed Cor the 
wants to learn t o writ* machine language 
16K NtN EXT Cassette - Postpaid 



CASSETrE TAP16 C-05 

$7.50 - Dozen / S9.50 - Doiten with hard boxes. Please add 
$1.30 per dozen shipping and handling f« blank cassette 



OWLS NEST SOFTWARE 



CEED. ": INPUT G*:CLS(B) 

2200 PRINT: PRINT "OK, " NAME* 

2210 PRINT "PLEASE TELL ME A LIT 

TLE ABOUT" 

2220 PRINT T* 

2230 60SUB 3430 

2240 PRINT "PLEASE TYPE IN SOME 
PHRASES ABOUT IT.": PR I NT 

2250 PRINT " (P.S. DON'T USE PUNC 
TUATION MARKS . I CAN'T DIGES 

T THEM. ) ":PRINT 

2260 PRINT "(PRESS <ENTER> WHEN 
FINISHED.) 

2270 PRINT: INPUT INFO* 
2280 PRINT #-2, CHR*(31)J "SOME 
WRITING IDEAS DEVELOPED BY ":PRI 
NT #-2, " " NAME*: PRINT #-2 
2290 PRINT #-2, "THE TOPIC IS: " 

: PRINT #-2, " "T»: PRINT #-2 
2300 PRINT #-2, "THE GENERAL IDE 
A OF THE PAPER WILL BE: »: PRINT 
#-2, " " INFO*: PR INT #-2 
2310 GOSUB 3430: CLS (2) 
2320 PRINT: PRINT "ONE OF THE MO 
ST IMPORTANT THINGSABOUT WRITING 

IS TO BE SPECIFIC, TO USE LOTS 0 
F EXACT DETAILS. ": GOSUB 3430 
2330 PRINT "LIST SOME DETAILS AB 
OUT YOUR SUBJECT.": GOSUB 3430 :C 
LS(2) 

2340 PRINT "FOR EXAMPLE, LIST SO 
ME OF THE 'SIGHTS' ABOUT IT. W 
HAT SHOULD YOUR READER SEE?" 
2350 PRINT: PRINT "LIST A SIGHT 
OR ' VISUAL DETAIL. '": PRINT 
2360 INPUT S* 

2370 PRINT #-2, "SOME DETAILS AB 

OUT THE TOPIC: ": PRINT #-2 

2380 PRINT #-2, " ###SIGHTS: " : 

PRINT #-2 
2390 GOSUB 3450 

2400 PRINT: PRINT " GOOD BEG INN IN 
G": GOSUB 3430: CLS (2) 
2410 PRINT "NOW LIST ANOTHER SIG 
HT": PRINT 

2420 PRINT "(OR PRESS <XXX ENTER 
>IF YOU'VE FINISHED)" 
2430 INPUT S* 

2440 IF S*="XXX" GOTO 2460 ELSE 
GOSUB 3450 

2450 CLS (2): GOTO 2410 
2460 CLS (2): GOSUB 3430: PRINT "NO 
W LIST SOME SOUNDS OR NOISES:" 
2470 PRINT #-2, " »##SOUNDS M : P 
RINT #-2 

2480 PR I NT: PR I NT "PRESS < ENTER > 

AFTER EACH SOUND. ": PRINT 

2490 PRINT "PRESS <XXX ENTER> WH 

EN FINISHED. ":PRINT 

2500 INPUT S* 
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2510 IF S*» "XXX" THEN 2540 
2520 SOSUB 3450 
2530 CLS (2>: GOTO 2480 
2540 CLS(3):PRINT 

2550 PRINT "THINK OF OTHER DETAI 
L5 USING THE SENSES. " : GOSUB 
3440 

2560 PRINT " SMELLS? TASTES? 

FEELING?" 
2570 PRINT #-2, " ♦♦♦OTHER SEN 
SES" SPRINT #~ 2 

2580 PRINT "LIST SOME SENSORY DE 
TAILS. " : PRINT 

2590 PRINT "PRESS <ENTER> AFTER 

EACH DETAIL. " : PRINT 

2600 PRINT "PRESS <XXX ENTER > WH 

EN FINISHED"! PRINT 

2610 INPUT S* 

2620 IF S*="XXX" GOTO 2650 

2630 GOSUB 3450 

2640 CLS (3): GOTO 2580 

2650 CLS<4>: PRINT 

2660 PRINT "THINK ABOUT ACTIONS 

(OR VERBS IF YOU TALK 'GRAMMAR'). 

":PRINT 

2670 PRINT #-2, " ♦♦♦ACTIONS": 
PRINT #-2 

2680 PRINT "LIST SOME ACTIONS FO 
R YOUR WRIT-ING I DEA. " : PRINT 
2690 PRINT "PRESS <ENTER> AFTER 
EACH ONE.": PRINT 

2700 PRINT "OR <XXX ENTER > TO MO 
VE ON. ":PRINT 
2710 INPUT S* 

2720 IF S«="XXX" THEN 2750 
2730 GOSUB 3450 
2740 CLS(4):G0T0 2680 
2750 CLS (5 ) : PRINT 

2760 PRINT "AND NOW LIST PEOPLE. 
" : GOSUB 3430 

2770 PRINT #-2, " ♦♦♦PEOPLE": 
PRINT #-2 

2780 PRINT " WHO ARE THE MAIN ' CH 
ARACTERS' IN THIS ' DRAMA '?": PR 
INT 

2790 PRINT "PRESS <ENTER> AFTER 
EACH NAME OR <XXX ENTER> TO MO 
VE ALONG. ": PRINT 
2800 INPUT S* 

2810 IF S*="XXX" THEN 2840 
2820 BOSUB 3450 
2830 CLS (5) : GOTO 2790 
2840 CLS (6): PRINT 

2850 PRINT "EVERY COMPOSITION H 
AS AN AUDIENCE— ": GOSUB 34 

30 

2860 PRINT " THE PEOPLE WHO RE 
AD IT.": GOSUB 3430 
2870 PRINT "THINK OF THE AUDIENC 
E FOR THIS PAPER." 



FAMILY?" :G 



2880 FOR T=l TO 1500: NEXT T:CLS< 
6) 

2890 PRINT "WHO WILL READ IT?":G 
OSUB 3430 

2900 PRINT " FRIENDS?" : GOSUB 

3440 
2910 PRINT " 
OSUB 3440 
2920 PRINT " 
MATES?": GOSUB 3440 
2930 PRINT " 
TEACHER?": GOSUB 3430 
2940 PRINT "DESCRIBE YOUR AUDIEN 
CE": PRINT: PRINT"PRESS <ENTER> W 
HEN FINISHED. " 
2950 INPUT A* 

2960 PRINT #-2, "THE AUDIENCE FO 
R THIS PAPER IS:":PRINT #-2," 
" A*: PRINT #-2 
2970 CLS (6) 

2980 PRINT "IN A FEW WORDS, TELL 
WHAT YOU'D LIKE THEM TO LEARN 0 
R UNDERSTANDFROM YOUR WRITING.": 
PRINT 

2990 PRINT "PRESS <ENTER> WHEN F 
IN I SHED." 
3000 INPUT U* 

3010 PRINT #-2, NAME* " WOULD LI 
KE THE AUDIENCE TO LEARN OR UNDE 



S T Pi T ' S **ExrANDEo** 



COLOR GRPPlC PRINTER MTILITES 

ilTILITtS fW ft SOW WCXS CnP- 1 IS.COlOS SSfX-JC f MfiTEK/f t.OTUR 

•-o»6 rpocttux- '^ercm Cracooto <taMTw».s re* m»Imt site c* cn.o* 

BESIOKES JUST FOR THE COP-US 

color rsniT mi. uowcs m move 3 

10*>T B£L£!I£ THt OETHH5 
1 T« PHUTE,*. "WT C£UC*, Ei»ST 



RELDCRIE 



ud m<TE m tsanrsn, ect.i 

i IBK Of V/SRSE* COrTUIEf UTN « 
K Of .*S3fR. Jff f*S,Y to use» 

vea. rorn irtR vgjrr r* nur*w, copies m n«* in less r*zn 
foi*. wurEs rossETrt $24. 95 

COnPTERI?ED rtLi^RM SYSTEMS 

'ur>T. ,.{SS TtVf Tv-eNTT 
(WD S3FU.flHE. 



TsfiNSTicH Technology ra*«* 

1458 U. BIRCHUOOD ftUE . *™£ 
CHICAGO IL 60626 
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rstand:": print #-2, " h u*:pri 

NT #~2 

3020 CLS(7): PRINT 

3030 PRINT "IMAGINE YOU WERE TAL 
KING TO SOMEONE IN THAT AUDI 

ENCE.":GOSUB 3430 

3040 PRINT "YOU ARE GOING TO TEL 
L THAT PER- SON YOUR STORY."; BOS 
UB 3430 

3050 PRINT "HOW WOULD YOU BEGIN? 
" : GDSUB 3430 

3060 PRINT "TYPE IN YOUR OPENING 

WORDS." : PR INT 
3070 PRINT "THEN PRESS <ENTER>" 
30B0 INPUT W* 

3090 PRINT #-2, "A GOOD BEBINNIN 
G MIGHT BE: ": PRINT #-2," " W* 
: PRINT #-2 
3100 CLS<7>: PRINT 

3110 PRINT"WHAT NEXT?": BOSUB 34 
30 

3120 PRINT "WHAT WOULD YOU TELL 

THEM NEXT?" : GOSUB 3430 

3130 PRINT "TYPE IT IN. PRESS <E 

NTER> WHEN DONE. ": PRINT 

3140 INPUT »* 

3150 PRINT #-2, "NEXT WOULD COME 
: ": PRINT #-2, " "M«: PRINT # 

-2 

3160 CLS<7): PRINT 

3170 PRINT "AND WHERE WOULD YOU 
END?": GOSUB 3430 

31B0 PRINT "WRITE DOWN HOW YOUR 
STORY ENDS": PRINT: PRINT "PRESS 

<ENTER> WHEN FINISHED." 
3190 INPUT E* 

3200 PRINT #-2, "AND IT MIGHT EN 
D LIKE THIS: PRINT #-2, " 

E* 

3210 CLS (B> : PRINT 

3220 PRINT "OK, " NAME* 

3230 PRINT "YOU'VE TOLD ME A LOT 

about: ": print " "T* 



3240 GOSUB 3430 

3250 PRINT "YOU'VE LISTED SPECIF 

ic details:": gosub 3430 

3260 PRINT " SIGHTS 

SOUNDS": GOSUB 3430 
3270 PRINT " ACTIONS 

PEOPLE": GOSUB 3430 
32B0 PRINT "YOU'VE DESCRIBED YOU 
R READERS.": GOSUB 3430 
3290 PRINT "AND YOU'VE TOLD ME A 
BOUT YOUR BEGINNING, MIDDLE, A 
ND ENDING." 
3300 GOSUB 3430 

3310 PRINT "PRESS < ENTER >. ": INPU 
T G*:CLS<2) 

3320 PRINT Q 224, "* * * IT'S TI 
ME TO WRITE! * * *" 
3330 FOR T = 1 TO 2000: NEXT T 
3340 CLS <2>: PRINT 

3350 PRINT "USE YOUR PRINTOUT AS 

A GUIDE. " : GOSUB 3430 
3360 PRINT "YOU'VE PLANNED YOUR 
WHOLE PAPER": GOSUB 3430 
3370 PRINT "IF YOU ARE USING A W 
ORD PROCESS-OR,PLUG IN THE CARTR 
IDGE AND BE-GIN DRAFTING. ": GOSUB 

3430 

33B0 PRINT "OTHERWISE, USE THAT 
GOOD OLD WORD PROCESSOR". ": 60S 
UB 3430 

3390 PRINT " PENCIL & PA 

PER. " 

3400 GOSUB 3430 

3410 PRINT "##»#»»#*»**GOOD LUCK 

»*#*#*##*#»" 

3420 GOTO 3420 

3430 FOR T = 1 TO 1000: NEXT T:PR 
I NT: RETURN 

3440 FOR T»l TO 500: NEXT T:RETUR 
N 

3450 PRINT #-2, " " S*:PRIN 

T #-2: RETURN 
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EDUCATION 
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Math Problems 
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By Bruce K. Bell, O.D. 3 * 3 = □ 




1 *8 


= □ 



Seeing my six-year-old daughter's performance drop in 
first grade math brought to mind nightmarish thoughts 
of grueling over flash cards and parent imposed 
homework. But then as I searched f or a solution, 1 recalled 
how her petite face would light up when I would allow her to 
interrupt me typing in line 6099 of Space Ghouls just to type 
in her name and see it on the TV screen. Why not a computer 
based math drill program?! And so . . . Color Math Quiz 1.0! 

Color Math Quiz is designed to be full of color (the eye's 
delight) and simple enough to be operated by pre-school 
children; yet includes levels to challenge junior high stu- 
dents. Although designed for run in Extended Color BASIC, 
it can be easily modified for Color basic. The program uses 
less than 2K memory, so will easily run on a 4K computer. 

The Run 

lit Screen: Here the upper limits of the operands are 
requested. For young children, this is entered by the super- 
vising adult. If zero (0) is entered for either or both of the 
operands, then decimals less than one (I) are used. This 
screen is viewed only after RUN. 

2nd Screen: This is the operations menu. Five menu items 
are presented; addition, subtraction, multiplication, divi- 
sion and fractions, respectively. To the left of the first item 
appears a reversed question mark (?). If addition is desired, 
then the Y key is pressed. Otherwise, the N key is pressed. 
The program uses INKEYS so ENTER is not necessary. 
Additionally, the program is key specific and will accept no 
other responses. After the response, the question mark is 
displayed to the left of the second menu item. As many, or as 
few of the operations may be chosen as desired by simply 
pressing Y or N by the appropriate item. Af ter entering the 
fifth menu choice, the third screen appears automatically. 
3rd Screen: At the top of the screen, the operation choices 
are displayed. Below this, the first problem is given. If the 

(Bruce K. Bell, a practicing optometrist, has developed 
a computer program for analysis of optometric data 
and uses it in his practice. He has written and lectured 
on vision and it's role in learning disabilities.) 



answer given is correct, then a colorful banner is displayed. 
Otherwise, the correct answer is given. After six problems 
"charge" is played and the number correct is shown at the 
top of the screen. After a few seconds, the menu is 
redisplayed. 

END: To end the program merely press that little red key— 
the BREAK key. 

Fractions: If fractions are chosen, then the operands will be 
fractions less than one (not decimals unless the upper limit is 
zero) with the upper limits of each numerator and denomi- 
nator as set in the first screen. If fractions are not chosen, 
then integers are used as previously discussed. 
To input an answer to a fraction problem, type the numera- 
tor followed by a comma (,) and the denominator, then 
ENTER it. 

COLOR BASIC MODIFICATIONS: For using in Color 
basic, simply omit lines 3, 8, 115 and 305. Change the 
phrase "FNR(X)" in lines 255 and 400 to INT(X+.005) 
* 100)/ 100 where X is the appropriate variable. Forexample 
the first command in line 255 would be changed to R+INT 
((R+,005)*100)/100. 
INTERNAL FUNCTION 



Lines 1- 
Lines 10—60 
Lines 100—140 
Lines 150—310 
Lines 400—430 
Lines 1000—3000 
Lines 9000—9030 
Line 9050 



Define variables 
Input operand limits 
Input from Menu 
Quiz is performed 
Build fractions 

Mathematical operations performed 
Subroutine for color banners 
INKEYI subroutine 



Color Math Quiz incorporates several programming 
functions to make it user friendly. Line 120 uses POKEs to 
the video memory located from 1024 to 1536, each corres- 
ponding to a PRINT® location (0—511). The POKE 
method is useful to obtain characters not available by CHRS 
or when a cursor no-update is desired. To seethe full array 
of characters available by this method the following pro- 
gram may be used: 

10 CLS 
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20 FOR X=0 TO 255: POKE 1024 +X.X: NEXT 
30 GO TO 30 

By making menu selections in this manner, any combina- 
tion of operations can be chosen. 

The DEF FN and FN commands are useful when a single 
variable mathematical operation occurs several times dur- 
ing the program. Each time X=FNR(X) is encountered, X 
(or whatever the current variable) is rounded to two decimal 
places by the formula given in line 3. 

The operands and operators are randomly selected in line 
200. If fractions are to be performed, then the random 
selection of numerators and denominators occurs in line 
400. 

Line 2000 tests to see if the difference is less than zero, 
while line 4000 tests to see if the quotient is a decimal 
number. If neither is true, then randomizing reoccurs. The 
exception is during fractions where negative numbers are 
allowed. 

The color bannersare created in lines 9000 and 9010. The 
Boolean operation AND is perf ormed on X to keep its value 
between ZERO (0) and seven (7). AND compares bit by bit 
the value of X and 7. If both are set (equal to one) then the 
resultant is set. For example, (5AND7)=5 because 
0101 = binary 5 
AND 0111= binary 7 
0101 = binary 5 

On the other hand (8AND7)=0 because 
1000 = binary 8 
AND 0111= binary 7 
0000 = binary 0 



"AN ABSOLUTE JEWEL", "THE PERFECT DBH" 
'I USE C.C.NRITER FOR MY CORRESPONDENCE" 
"IMPRESSIVE", "JUST RIBHT", "PROFESSIONAL" 

Trans Tek Software 

has earned these words of praise froi re- 
viewers in The Rainbow, 80 Micro, Creative 
Computing, and other publications. Like 
our customers, you'll see why when you buy: 

C.C.Calc The Electronic Spreadsheet $34.95 

C.C.File The Micro Data Base Manager $12.95 

C.C. Writer Versatile Word Processing $29.95 

CD. Nailer Hailing List/Letter Merge 129.95 

(rot 

Trans Tek 

194 Lockwood 
Blooeingdale, IL 60108 
or 

your Favorite Dealer 



To see the values C, in line 9000, takes on, type the following 
program. 
10 CLS 

20 FOR X=l TO 32: C=(XAND7) 
30 PRINT X": "C, : NEXT 
40 GO TO 40 

Variables HIS, H2S, H3S Title/ Credits 

0 (X), 0$(X) Arithmetic operators 

X,K,QS,S,T,0 Work variables 

CH$ Charge chorus 

MS Menu heading 

A,B,AR,BR Operands 

AN,BN,AD,BD Fraction operands 

R,RN,RD,C Responses, eorrect answer 

NC Number correct 

Possible Modifications 

As written, Color Math Quiz reinitializes the number 
correct each time the menu is encountered. For cumulative 
scores, delete the statement NC=0 in line 100. Also you may 
desire to establish lower limits as well as upper limits. 
Merely add the desired lower limit to the resultant of the 
random operand selection in line 200. By removing the 
randomizing function of BR in line 200 and letting B=BR 
you can now do, for example, multiplication tables for the 
sixes (6s). 




The listing: 

0 ' COLOR MATH QUIZ MAY BE FREELY 
COPIED AND MODIFIED FOR PERSONA 

L USE 

1 Hl«="COLOR MATH QUIZ 1.0": H2« 
=" COPYRIGHT (C) 19S3 BRUCE BELL" 
: H3S=" EXTENDED COLOR BASIC 16K" 

2 DIM 0<5>,0*<5> 

3 DEF FNR(X)=INT ( (X+.005) *100) /l 
00 

5 H1S=" COLOR MATH QUIZ 1.0": H2* 
=" COPYRIGHT (C) 1983 BRUCE BELL" 
: H3«= "EXTENDED COLOR BASIC 16K" 

7 0*(1> = ,, + ": OS<2) = "-": 0«<3)="X 

-: o«<4>='V": o*(5)="," 

8 ch*="T7;o3;l5;g;b;o4;c;d;pi0;o 
3;b;o4;l2;d" 

10 CLS: PRINT H1*,H2«,H3»: PRINT 
50 PRINT: PR I NT "ENTER THE UPPER 
INTEGER LIMITS FOR THE OPERANDS 

60 PRINT: INPUT"FIRST LIMIT"* AR: 

INPUT "SECOND LIMIT" > BR 
100 NC=0: CLS: PRINT H1*,H2*,H3* 
,*,: K=0: M*=" OPERATION MENU ": 

GOSUB9000: PRINT 
110 PRINTTAB(7)"1. ADDITION < + )" 

TAB(39)"2. SUBTRACTION (-) " TAB 
(39) "3. MULTIPLICATION (X)" TAB( 
39) "4. DIVISION </)" TAB(39)"5. 
FRACTIONS (,)": PRINT 
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115 SCREENS, 1 

120 FOR X-1TOS: POKE1253+X*32,63 
130 QOSUB9050: IF Q«-"Y tt THEN 0( 
X)-l: POKE1233+X*32 t 23 ELSE IF Q 
•-"N" THEN O(X>-0: P0KE1253+X*32 
,14 ELSE130 
140 NEXTX 

150 M*-- H : FOR X=1T05: IF O<X)-0 
THEN NEXTX ELSE M«=H*+0*(X>+" " 
: NEXTX 

160 S-(16-LEN(H«) )/2: M»=STRIN8» 
(S, " ,, )+H«+STRIN0»(S, " M ) 
170 K-0: CLS: PRINTTAB(7>"C0L0R 
MATH QUIZ 1.0": QQSUB9010: PRINT 
190 FOR T-1T06 

200 A-RND(AR): B-RND(BR): 0=RND< 
4>: IF O(O>»0 THEN200 
203A=FNR(A>: B-FNR<B> 
210 IF 0(5>=1 THEN400 
220 ON O GOTO1000, 2000, 3000, 4000 
240 IF 0(5)-l THEN255 
250 PRINT AfO*(0>5B ,, -"f I INPUTR 
255 R«FNR<R>: C=FNR(C) 
260 IF ROC THEN PRINT "NO, "CIS 
CORRECT" ELSE PRINT"RI6HT ! " J : F 
ORX-0TO25: PRINT CHR* < 143+16*(X 
AND 7)>j: NEXTX: NONC+1 
270 NEXTT 



300 PRI NT87, "YOU 80T"NC"CORRECT ! 

305 SCREEN0,l: PLAY CH* 

310 FOR X-1TO5*490: NEXTX: 80T01 

00 

400 AD-RND(AR): BD=RND(BR): AD*F 

NR(AD): BD-FNR(BD) 

410 PRINT A ,, / ,, ADIO*(0>IB"/ ,, BD"-» , 

I 

420 INPUT RN, RD: IF RD-0 THEN420 

425 r=rn/rd: a=a/ad: B-B/BD 

430 ON O GOTO1000, 2010, 3000,4010 

1000 C-A+B: 8OTO240 

2000 IF A~B<0 THEN200 

2010 C*A-B: QOTO240 

3000 C-A*B: QOTO240 

4000 IF A/B< >INT ( A/B) THEN200 

4010 C-A/B: QOTO240 

9000 F0RX=1T032: C-(X AND7) : PRI 

NT CHR*(143+16#C>|: NEXT: PRINT 

9010 FOR X-1TOB: C=(X AND7) : PRI 

NT CHR*(143+16*C> J : NEXT: ON K B 

OTO9030 

9020 PRINT M*|: K-l: QOTO9010 
9030 RETURN 

9050 Q*-INKEY«: Q-VAL(Q«>: IF Q* 
="" THEN 9050 ELSE RETURN 

. 



SOUTHERN SOFTWARE SYSTEMS 

^ SERIOUS SOFTWARE FOR THE COLOR COMPUTER 



Presenting. . THE GRAPH ZAPPER, 
THE BAR ZAPPER and THE PIE ZAPPER 



• THE PIEZAPPEH draws pie chars o? your data -plain or fancy severs- 5 kinds of sectors -alternate sectors styles to make an autslandint impact- labeled 
sectors-tptitn to display raw numbers or percentages On chart with or without totals. 

• THE BAR ZAPPER creates bar graphs with multiple bars- five different bar styles-positive and negative bars-can use names or n^maers for bar identifi- 
cation- plenty of options- "trtremety easy louse. . .Beautiful. . .Wei prepared and documented tool." The Rainbow, April 1983, 

• THE GRAPH ZAPPER plots I ne graphs of data and situations- multiple lines with different symbols- mix equations and data on the sa'"e gtaph -with or 
without grids- plots lines or poi- ts "The Graph Tapper U oneof themost completely documented pieces of software ve have seen. . .The Graph 
Zapper is an outstanding <rf*Wy and canoes major be! in statistical, business and other uses where graphic representation ol numbers is ossksbh. " 
The Rainbow, Dec. 19B2 

• Endless applications- electric consumption, stock prices, matt) class equations, children's height ana weight, data analysis, trend indication, experimental 
results, statistical analysis, sales presentations. 

■ The three ZAPPERS provide you with a sophislxated capability that will handle from the simplest to Ine n:>si complex graphing needs. 

All three ZAPPERS have these Features: 



• High resolution graphs with on screen numbers, titles, and labels. 

• Sophisticated data editor makes changing data simple. 

• DiskversionhasaddBdfeaturesincludingsitringct-pieted graphs 
onil.sk and menu criven tils loading 

• Detailed user's guides for all features. 

• Low resolution graphs can"! compare. 

• 14 day nuney bac* guarantee. 



» User friend y. easy to undents -d 

• Thorough error prevention 

• Save data far later irapning or edit'ng. 

• tow cost upgrade from taDe to disk. 

» Hard copies possible wifr- resdily avails 
for nearly any brand of printer. 

• Requires -Ext. Ctlor Basic and celivered o 



$15.95 add $1. 06 kr shipping . . . send cheek, money order, 

for 16K tape versions w VISA/UasierCard number and expiration date 

$44.95 for all three tape versions + $3.00 shipping 
$56,95 for all three disk versions + $3,00 shipping 
Florida residents add 5% sales tax 

SOUTHERN SOFTWARE SYSTEMS 

85 South Tropica) Trail, Suite 109 • Merritt Island, F!orida32952 • 



cassette. 

$19.95 

f»r 32K disk versions 
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Software He Weir- 



Eeeeeee Yah! 
Ninja Warrior Is Here 



I'vealwayshad a secret desire to be a martial arts expert. I 
even took a couple of Judo lessons once, but neverfound the 
time or the energy to finish them. I guess I'm really a lover, 
not a fighter. 

But now! I'm a Ninja Warrior, A Ninja warrior is a deadly 
kicking, high jumping, Sai (pronounced "sigh" and looks 
like a trident, a three-pronged spear) carrying martial arts 
expert, who destroys boulders with a kick, catches fiery 
meteors on the Sai, jumps over deep chasms, and fights 
enemy Ninja. 

As you've probably guessed, Ninja Warrior is a new 
arcade-style game for the CoCo and the TDP-100. Charles 
Forsythe, a 17-year-old M.I.T. siudcni is ihe author of ihis 
machine language program from the Programmer's Guild. 
It is designed to run on any 16K machine and comes on a 
protected cassette (auto-load and EXECute) in a hand- 
somely decorated box and with one sheet of instructions. 
The game responds to cither keyboard control or the left 
joystick. The scenario of the game is as follows: You're a 
Ninja Warrior running "along a dangerous mouniain road" 
(though the mountain road is perfectly flat). You encounter 
obstacles along the way which must be dealt with. Boulders 
are everywhereand can be kicked todust or jumped over. A t 
higher levels, fire appears in the road, too, but ean be 



DRAW-IT 

I Requires l&C -Ext. BASIC, cassette. * 

* Draw and erase lines, circles, * 

* boxes, and vectors. * 
£ Alphabetically coded keyboard * 
J control, with sound cues. * 
I Hl-ftesolution, 256x192. f 

J On-Screen cursor, with variable * 

* * 

* jump rate. * 

J Faint function, can be used to * 

* produce negative graphics. * 

* * 
J Tape storage of graphics screen, ;* 

£ change taped graphics. * 

I $15.00 I 

* J P S I 
I nk62 Columbus Ave.,W. * 

* Fostoria, OH, kMQJQ * 



jumped. Al even higher levels, pits open at your feet and you 
have to jump for your life. Also in the higher levels, fiery 
meteors appear falling from the sky and, if you're agile 
enough, you can catch them on your Sai. 

As you progress, things get more complicated as enemy 
Ninja appear and have to be destroyed, boulders begin 
appearing stacked two high, and in the upper levels, the 
boulders start shooting arrows. Ai the highesi level, when 
youbecomeagrandmaster,youget toconfrom the Ultimate 
Ninja! (No, I haven't had the pleasure yet, but I can't wait.) 

Actually there are 16 levels or belts(like brown belt, black 
belt, etc.) of play, each getting more difficult as more and 
more of the obstacles begin to appear. Each level seems to 
add a new type of obstacle, not all of which are documented. 

You initially have three Ninja Warriors and gei an extra 
one for each 10,000 points. I don't know how many you can 
have at one time, as I've not been able to keep more than 
three and the instructions don't even mention extra war- 
riors. The game can have one to six players and the top three 
scores are displayed on the rather colorful title screen (gen- 
erated by the auto-loader). 

The Ninja is controlled by either the keyboard or left 
joystick (the instructions failad to mention it was the left 
one). The keyboard control uses the spaeebar to kick, the 
up-arrow key to jumpand the right-arrow key to "speed up" 
the Ninja. Thejoystick uses the fire button tokick. The jump 
Is aehieved by pushing the joystick forward and, for "speed 
up," you push thejoystick to the right. I recommend the use 
of a center return-iype joystick because if ihe siick isn'i 
returned to center after a jump or speed up, you can't kick. 1 
don't have a center return-type and found it verydif ficuh to 
keep it centered myself, so I used the keyboard control and 
found it lo be very good. 

The graphics are well done, if not overwhelming, and the 
sound is good, though the running sound starts to grate a bit 
after a while. Tbe illusion of motion is produced by having 
the Ninja "running"in place at the left side of the sereen and 
the obstacles and the sky move from right to lef t; the effect is 
pretty good. The speed-up is just moving the Ninja toward 
the right edge of the screen, giving you less time to decide 
what to do f or eaeh newly appear ing obstacle. This speed-up 
option adds a third dimension of control which really strains 
the old hand-eyecoordination. Af ter playing this game for a 
couple of hours now, I still haven't mastered it (but coordi- 
nation was never a strong point for me). 

My two resident arcade players, Cheryl, age 12, and Tim, 
age nine, initially were not impressed with the game, proba- 
bly because of ihe high level of coordination necessary to 
play, I told them to stick wiih ii for a while and, now, I need a 
reservation to get ai my CoCo. 

On a slightly sour note, I found the instructions to be 
confusing, misleading and not very complete. Fortunately, 
the game itself is simple enough not to require a lot of 
information to play. My adventurous son, who never reads 
ihe instructions anyway, tried all sorts of things, some of 
which worked in spite of the instructions telling me other- 
wise or not mentioning them at all. 

So, if you like to be challenged, give yourself a treat and 
become a Ninja Warrior. 

(The Programmer's (Guild, P. 9. Box 66, Peterborough, NH 
03458, S29.95 on cassette) 
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Logo, Pilot 
And Computer Literacy 



By Larry Kheriaty 



Probably the most common justification for buying a 
Color Computer is education, whether it be at home 
or in the classroom. Most of the people I know who 
have bought a personal computer say that at least one of 
their reasons is to allow themselves or their family members 
to learn a little about how computers work. In my town 
there are some excellent computer literacy courses based on 
the Color Computer being taught at schools ranging from 
Assumption Grade School to Western Washington Univer- 
sity. 1 am also aware of several businesses or schools offering 

"For older persons there is often 
the problem of an already ac- 
quired mistrust of computers or a 
feeling that they are too mathema- 
tical or too complicated to under- 
stand. The best way to solve this is, 
again, hands-on experience with a 
computer. " 

very poor instruction in computer literacy. What distin- 
guishes a good eourse from a bad one? To answer that 
question we need to talk first about what we mean by 
computer literacy. 

The goals of any computer literacy program are the same 
whether you are enrolled in a formal course taught by an 
instructor, or you are learning at home on youT own. There 
are essentially three goals. First, and most important is to 
raise the student's comfort level with the computer. This is 
accomplished by hands-on experience designed to simply let 
the student see firsthand that nothing will explode if the 
wrong button is pushed. The younger the person, the easier 
it is to develop a relaxed familiarity with the computer, and 
there are fewer misconceptions, fears or anxieties about the 
computer. Television and video games have paved the way 
for this aspect. For older persons there is often the problem 
of an already acquired mistrust of computers or a feeling 

(Larry Kheriaty is owner of Washington Computer 
Services in Bellingham, WA and is author of Radio 
Shack s Pilot, Logo, Game Writer and several other 
Radio Shack company products.) 
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that they are too mathematical or too complicated to under- 
stand. The best way to solve this is, again, hands-on expe- 
rience with a computer. If they start out on the right foot, 
people are usually pleasantly surprised at what they can do 
without much technical knowledge. 

The second goal is to build realistic expectations about 
what a computer can do. This requires that you know, at 
least in general terms, how a computer does what it does. As 
an analogy, we are all literate enough about automobiles to 
avoid such mistakes as to expect one to fly, or to attempt to 
use a sports car when a dumptruck is called for. It isn't 
necessary to be a mechanic in order to use a car effectively, 
but most drivers understand the car well enough to know the 
difference between a flat tire and running out of gas. These 
examples are so obvious that they sound absurd. But time 
and time again, I have spoken to people who have bought a 
computer expecting it to do a job that it simply could never 
do. The choiees they make are so far from realistic that it is 
clear they did not have enough basic understanding to do 
anything other than buy what the salesperson said would be 
good for them. Other common miseonceptions are expect- 
ing the computer to be intelligent, or expecting information 
back out of the computer that is not first put into the 
computer. An example of this is the storekeeper who would 
like to be able to check with the computer to see the present 
state of his inventory at any time; while not realizing the 
amount of work necessary to keep that information up to 
date on the computer, and not realizing the amount of data 
storage consumed by such a system. To become literate 
about cars we ride in them, drive them, buy a ear and cope 
with the problems that come up as we use it. To become 
computer literate you should run one, try various programs 
and cope with the problems that come up. In this way you 
see firsthand what the various parts of the computer do and 
how things are done on the eomputer. 

The third eoncept of computer literacy is to understand 
what software is, and what its relationship to the computer 
is. In faet, what is learned here is that computer literacy is 
actually software literacy. The computer itself is inert with- 
out a program to direct it and tell it how to respond to the 
user. Traits that might be thought of as the computer's are 
really the program's. And the personality or "soul" of the 
computer can be changed at any time by running a dif f erent 
program. A good way to think of it is that the computer is 
only a delivery medium. When a program is run, there are 
two parties in the conversation; the person and the program. 



When you talk to someone on a phone, you do not converse 
with the telephone itelf, it is only the medium by which you 
communicate with the other person. When you can think of 
running a program on a computer as similar to talking with 
a person on a phone, you are on the right track. Along with 
this view of software, it is necessary to understand how 
software tells the computer what to do. Just as it is not 
irtlportantto become amechanicinordertodriveacar.it is 
not important to become a programmer to run a computer. 
But it is necessary to be exposed to programming enough to 
see how things are done, tn the sense that a computer thinks 
by running a program, you can use a computer best if you 
know how it thinks. 

The concept of sof tware is the one that makes the compu- 
ter so different from any other tool. It is also the concept 
which most often confuses the new user. To add to the 
confusion people are told that BASIC is about as easy as it 
gets. Then, when they find that it is a very slow and compli- 
cated process to write a BASIC program they can get discour- 
aged. Since software is the most unfamiliar idea to the new 
user, it is the one that should be approached most caref ully. 
Since it is not a goal of computer literacy to make pro- 
grammers out of everyone, it is more important that the first 
contact with programming be truly easy, and be truly repre- 
sentative of what software is about. So when it comes down 
to it, the most important aspect of any computer literacy 
program is the selection of the software to be used for the 
person's first experience. 

This is where [*go comes in, Logo is specifically designed 
to introduce people to programming. The results of a pro- 
gram are always a picture on the screen. This gives the 
student immediate visual feedback on what has happened. 
To the student, Xogoappears as a "turtle" whichliveson the 
display screen. At any time, the turtle is visible at a specific 
place on the screen, and is pointed in some direction. The 
user tells the turtle to walk forward so many steps, or turn 
right or leftso many degrees. As the turtle moves, itleavesa 
colored line on the screen, The effect of seeing an imnwdiate 
action take place on command gives the student a good feel 
for the concept of telling the computer exactly what to do. 
For example, the student would type a command like 
FORWARD SO and the turtle would immediately move 50 
steps in the direction it is pointing. For children too young to 
read, or type, Logo is supplied with a keyboard overlay 
which labels some of the keys with pictures that represent 
turtle commands. Using the "doodle mode" the turtle can be 
directed by single keystrokes. Once the student is comforta- 
ble with giving one command at a time, she can combine 
several commands into a procedure, give the procedure a 
name, then tell the turtle to do the procedure. For example: 
TO BOX 

FORWARD 50 or TO BOX 
RIGHT 90 REPEAT4 
FORWARD 50 (FD 50) 

RIGHT M RT90) 
FORWARD 50 END 
RIGHT 90 
FORWARD 50 
RIGHT 90 
END 

The BOX procedure on the left tells the turtle howtodrawa 
square oh the screen. The BOX procedure on the right does 
the same thing, but uses abbreviations for the words FOR- 
WARD (FD) and RIGHT (RT). It also saves typing by 
using the REPEAT command which just says to do what is 



in the parentheses four times. A procedure always starts 
with the word TO followed by a name. It ends with the word 
END. Once the procedure BOX is typed into the computer's 
memory then the student can tell it "BOX," and the turtle 
will follow the procedure named BOX. The concept here is 
that by writing the procedure the student has told the turtle 
how "to box" when it is told to do so. If the student were to 
tell the turtle "FLY," then a message "I DONT KNOW 
HO W JO FLVwould come back. This would mean that no 
procedure has been entered to give the instructions to be 
f ollowed when told to fly. The student can enter any number 
of procedures; each one defines a new action that the turtle 
knows how to do. By actually doing it the student learns 
what programming is about, and since LOGO procedures 
are so easy to understand, the chances f or a good experience 
are much greater than with something like BASIC. One of the 
main benefits of LOGOis that the student learns structured, 
logical thinking by placing commands in logical order. 
Because of the visual nature of LOGO, there seems to be a 
high degree of incentive on the part of the student to experi- 
ment with ideas. In f act, the basic premise is that LOGO is a 
tool for experimentation and creativity. It is very easy to 
master the commands needed to use LOGO, but they can be 
combined in an infinite variety of interesting ways. The 
concept of modular or "building block" logic is fostered 
since the student can use previously defined procedures to 
build new procedures. For example: 
TO FAN 
REPEAT 20 
(BOX 
RIGHT 18) 

END 
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"TAKE ADVANTAGE OP VOLUME BUYING" 

- Some software houses offer up 
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FAN produces a beautiful circular fan of 20 boxes rotated 
around at 15 degree intervals. Notice that it uses the pre- 
viously defined procedure BOX. 

To enter the procedures into memory, the student uses a 
very simple screen oriented text editor which is built into 
LOGO. The student just types on the keyboard and the 
screen shows what the text looks like. The various arrow 
keys are used to move about in the text on the screen. The 
editor is designed to be a simple example of how a typical 
word processor works. In fact, it can be used to enter any 
text, which could be printed ma a printer later So in the 
proc the student learns the underlying concepts of word 
processing, probably the most common business use of 
microcomputers. 

Even though LOGOwas designed for kids, it turns out to 
be the best place to start for a person atany age since it starts 
out simple and lays an appropriate foundation for further 
learning. In this short article we have only scratched the 
surface of LOGO's capabilities. For the more advanced 
person, the concepts of recursion and multi-tasking can be 
explored since LOGO allows as many turtles as desired to all 
be running theirown programs simultaneously. But beyond 
computer literacy, LOGO is a great medium for "playing" 
witb logical concepts that expand the child's ability to think 
logically. And allexpcrience so far shows that kids consider 
the challenge fun. I don't know where the word LOCOeame 
from, but ifitis derived fromtheGreek word "logos" it lives 
up to its name, which in different contexts means "word," 
"idea," "concept," "discovery" or "thought." 

A second very useful educational program for the Color 
Computer is Color PILOT. It is used in quite a different 



PRO-COLOR-FILE 



. . If s dsrf intariv ■ gigantic step fur the serious Co Co « 



tf you can't believe the reviews of these leading magazines for the 
Colo Computer, then there is nothing we can 
you Of the versatility of PRO^OLOR-FILE. 



IF you're in need of a program with the flexibility that Jets you 
design your own records management system with up to 60 data 
fields, 4 data entry screen*, 14 math aquations, 5 custom report 
formats, and records lengths of up to 1020 bytes; AND that has 
the capability to dupl icate records, index a file alphabetically on 
up to 3 fields simultaneously, print reports cm a printer or the 
screen, select records using <, < >, >-, =, <> 
comparators individually or together with AND / OR relation- 
ships, obtain totals and averages, find any record out of a file of 
IsWO in 10 second* or less, and utilize from 1 to 4 disk OYhws, 
THEN PRO COLOR-FILE WILL FILL YOUR NEED8I 



Only $79.95 + $2.00 Shipping and Handling. 

We accept VISA, MASTERCARD, Cheeks or Money Orders. 
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PRO-COLOR-FILE ©1983 Dennis Derringer. 
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manner. With LOGO, the student learns by writing LOGO 
commands and programs. It is the experimentation with 
writing LOGO programs that provides the educational 
experience. PILOT, on the other hand, is used to write an 
educational program that will be run by the student. The 
writing of the PIL OT program is like the preparation of a 
lesson. The student's learning experience comes from exe- 
cuting the lesson program. Also, with LOGO the subjeet 
matter to be learned is computer literacy and logical think- 
ing, whereas PILOT is used in situations that have com- 
monly been called "computer assisted instruction." As an 
example, a PILO T program could be written that would 
help the student study spelling. In this example, the author 
of the Pf LOT program would write the program so that the 
student is presented with problem words. The author is 
using PI LOT to create some learning environment for the 
student. Students later run the lesson program and interact 
with it. In this case, the computer is a teaching medium for 
some other subject matter. The student is not necessarily 
learning about computers per se. PILOTbas the same built- 
in text editor as LOGO, so the mechanics of entering a 
program are very simple. The PILOT language has com- 
mands that simplify the presentation of text and graphics. 
There are also simple commands to accept and judge student 
replies, then give appropriate feedback. In general, PILOT 
is much easier to learn for this type of programming than 
basic because PILOTis specifically designed for this appli- 
cation. The following /VZ.OTstatements present a question, 
accept a reply, then give appropriate feedback. It is, of 
course, too simple to be useful but it does show the essential 
elements of a question/ answer frame. 

T:What element is found in (type a question) 

T:all organic compounds? 

A: (accept an answer) 

Mcarbon (match f or correct reply) 

TY:That is correct. (correct reply feedback) 

TN:No, the answer is carbon. (incorrect reply feedback) 

There are three contexts in which Color Computer 
PILOT would be useful. The first is in the preparation of 
educational software to be sold commercially. In this case 
the process is analogous to the writing of a textbook in that 
much work is spent on the original so that it can be pub- 
lished and used many times. The second environment for 
PILOT use is the classroom. The teacher uses PILOT to 
create a lesson, drill or lab exercise that complements the 
classroom material. This provides a way to give students 
extra practiee where needed, supplementary material for 
advanced students or to demonstrate some point that can't 
be demonstrated by other means. The third context for 
PILOTis as a means of supplementing the student's school 
work at home. This could be done by the parent writing 
lessons, or by buying or checking out materials already 
written in PILOT. Even though PILOT would be easy 
enough for a child to learn, i t would not normally be used as 
a language in which a child would learn to write programs. It 
is intended to be used to write programs that teach some- 
thing, so to make effective use of PILOT one would have to 
know what is to be taugbt, and how to teach it. PILOTis 
simplv the way to put the lessoninto the computer so that it 
can be delivered later to the student. 

LOGO and PILOTsre both very useful educational pro- 
grams that no Color Computer should be without. LOGOxs 
used for computer literacy, and PILOTis used for computer 
assisted instruction. ^ 
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Software Review: 



Catacomb Is 
Amaze-ing Game 

Oregon Color Computer Systems has come out with a 
new game, Cm'tacomb. Just put in your cassette and 
CLOABM. T he pr ogram does the rest. As a programmer, I 
wanted to see how the auto loader worked. When loaded 
into my EDTASM+, the source code didn't mean anything 
to me, and a couple of the commands even messed up the 
EDTASK1+. Enough of this, let's get to the game. 

You are trapped in a maze-li ke catacomb with the enemy 
patrolling all of the corridors. Although you have the energy 
to break out of the Catacomb when you start, It is recom- 
mended by this reviewer that you commandeer a full load of 
fuel to make it through the second screen. Vou must move 
through the Catacomb seeking fuel blocks until you feel you 
have enough. There are guards patrolling the Catacomb, so 
watch out! There are two types *f guards, one type looking 
sort of like an "@"(at sign)and the other resembling sw oop- 
ing eagles. The"@" guards come through either the left or 
right wa'is and travel the horizontal passages. The eagle 
guards cortie in at either the top or the bottom of the screen 
and patrol the vertical passages, 

When y»ti turn on the computer, the color the game will 
be is already decided. It will either be a red maze with you 
blue or a blue maze with you red, the monsters are always 
white. If you are like me arid are picky ab»ul what is what 
when it comes to color, this little routine in BASIC should 
clear up the problem. Just type it in when you power up. If 
the screen is red, then the maze will be red. If the screen is 
htue, the maze will be blue. Remember, type this in before 
loading the program. 



10 POK.E&HFF22,&HF8 
2Q POK£&HFFC5,&HF8 
30 POKE &HFFCI.&HF8 
40 FOR i=cH400 TO &H 1 BFF 
5i POKE I.&HAA 
60 NEXT I 

You should see a screen with many red, white, and hlue 
blips on a black background. The screen sh*uld turn red 
from the top to the bottom for blue). When the program 
finishes, type A' EW.CLOADM, Catacomb should now load 
in. If the color isn't what you want it to be hit reset and then 
RUN the program again before you erase it. Because of the 
nature of the graphics screen you may have to reset the 
computer more than once. By the way, the BASIC program 
will work in Extended or Disk Extended BASIC. It might 
work in Color BASIC, but I don't know. Catacomb runs in all 
the BASlCs. 

Back to the program. To get io the second screen, you 
push the lire button. The second screen is the hypcr-spaee 
corridor. You must maneuver around the enemy Vessels 
which fly straight down, and avoid the space mines which fly 
straight down until they detect you, at which point they 



crisscross the screen, You can fire now (go#die!) and your 
mission is to fly to the other end of the corridor, through the 
starport, and to the mother ship. A full load of fuel will 
guarantee that you have enough to reach the mother ship, 
but there are energy blocks along the way that youcantry to 
pick up if you don't have a full toad. 

Pulling back on the joystick during flight will increase 
speed; pushing forward will slow it down. I cant describe the 
mother ship or the stargatc, because i haven't made it there 
yet, but the screen gets rather full with perhaps 20 enemy 
vessels and 15 space mines crisscrossing in front of, behind 
and all around you. 

On the first screen, you receive 25 points for each fuel 
block you steal, and 1,000 points for having a full load. On 
the second screen you get 35 points for each enemy vessel 
youdestroy, 50 points for each space mine, and 1.000 points 
for reaching the mother ship. 

This is a great program with very good graphics, 

If you like arcade games, purchase this one - it's good! 

(Oregon Color Computer Systems, P.*. Box 11468, Ea- 
gene, OR 97440, $19.95 disk or cassette) 

-Seoti Sehlhorst 



OELRICH PUBLICATIONS, INC. 

BRINGS YOU MORE 
GREAT SOFTWARE VALUES 

From DataSoft: 

ZAXXON 32KDiskorcass, $35,95 

MOONSHUTTLE 16Kcaas. 31,00 

From Synapse Software: 

PROTECTOR II 32KDiskorcas8. 29.95 

PICNIC PARANOIA 32K DisW16K cass. 29.95 

SHAMUS 32KDisk/16Kcass. 29,95 

From Our own Software Lab: 

3-D Tic-Tac-Toe tSKcass. 16,95 

FrogTrek 16Kcass. 14.95 
All prices include shipping! 

SPECIAL OFFER! - ORDER ANY TWO GAMES 
AND GET A FREE M/L ADVENTURE GAME!!! 

TO ORDER SEND CHECK OR M/O TO: 

OELRICH PUBLICATIONS, INC. 
4040 N. NASHVILLE 
CHICAGO IL 60634 

OR CALL TOLL FREE: 800^21-0105 
(lh Illinois ball 312-545-9286) 

VISA AND MASTERCARD ACCEPTED 
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Zfrs\ Software RevlewZ 



Pick Which: 
Original, But Lacks Playability 



Many of the popular CoCo games today have their roots 
in the arcades. Others are adaptations of different types of 
pastimes, such as sporting and gambling games. Coming up 
with an original game that is also a fun one can be a very 
taxing ehore. 

Pick Which is a 16K machine language game that eomes 
as close to original as any game that I have ever seen. It 
features good graphics and sounds, and can be played by up 
to four people at ones. 

Playing Pick Which is about as easy as you can get. After 
you select the desired number of players, you are ready to 
begin. A big, picture appears on the screen, and there are 16 
smaller, but not visihle, pictures behind it (so to speak). By 
moving your joystick around, each of these smaller pictures 
can be made to appear one at a time. Aftera short period of 
time, the picture you are viewing at that moment begins to 
enlarge until it fills the screen. Depending on which pieture 
you wind up with, several things can happen. Sometimes 
you will gain points, and other times you will lose points. 
You could also wind up on a picture that will have the 
program pick the next one for you at random. One of the 
pictures will reveal the location of all of the others, while 
another will give you a short rest. Finally, the picture of the 
"stop sign" will end the game. 

Pick Which is an interesting game, but 1 am unsure as to 
who it is best suited for. It is too fast paced for very young 
children, and will probably not hold the interest of older 
children or adults. I guess the six to 10 year old range would 
be about right. If you have children in this age range, and 
would like to try something out of the ordinary, you might 
want to consider Pick Which, 

(Spectral Associates, 141 Harvard Ave., Tacoma. WA 
98466, S9.9S tape, $13.95 disk) 



Bugger's Talking Intro 
Not Matched By Graphics 

All heads turned toward the computer in our house when, 
upon loading Bugger, a tiny v»ice originating from my TV 
monitor cried out for help for a bug trapped in a web with six 
spiders. 

"Wow, what a game this is going to be," was the thought 
that raced through my mind as we waited f or the program to 
unfold, 

What followed was not to match the excitement 1 origi- 
nally felt, although the game was challenging, It's another 
"Pac-type" game with our hero trapped in a maze and 
def ying the odds against somelightning-quick web-weavers. 

The object, of course, is to escape the complex alive, 
which I found to be almost impossible since the spiders' 
movements are so unpredictable. While you're improving 
your skills you are able to eat tidbits of food that have been 
left lying around. The number of tidbits equals your score 
for a round, Until you'refinally able to escape, you'll have to 
be content with increasing your intake of these morsels. 

Maneuverability is managed through use of the arrow 
keys, which after you have become accustomed to them, 
prove to be fairly easy to use. I had to unplug my left 
joystick, however, to get them to function correctly. 

There are three lcvclsof play and aftereach round you are 
given the choice of a new skill level. 1 found the game flowed 
more smoothly by just pressing the ENTER key each time. 

Being an old hand at games like Pacman and Domdiebug, 
I was not that impressed by Bugger's %t?l\)\\\cs. However, III 
have to admit that the game is challenging and quite conta- 
gious. It's a nice game if you're watching your budget, 

(Mr. H's Software. 68 Kelly H»ad, So. Windsor, CT 06074, 
$14.95 on tape} 

—Charles Springer 



* * CoCo T-SHIRTS * * 




HANES QUALITY - TAN WITH COLORFUL GRAPHICS 
GREAT FOR INDIVIDUALS AND CLUBS 

SIZES; SM, MED, LG, XLG CHlLDS 10/12, 14/16 
PRICES; $6.95 EA. OR 2 5 AT $6.50 EA., 
6-11 AT $6.25 EA., OR 12 & UP AT $5.95 EA. 

SPECIFY QUANTITY AND SIZE WHEN ORDERING 
SEND CHECK OR MONEY ORDER TO: 

CoConut Products 

6400 N.W. 34th AVE., FT. LAUDERDALE, FLORIDA 33309 
SEND $1.00 FOR POSTAGE AND HANDLING 
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Genesis Software 

presents 

Color Computer Programs 
*Secret Of The Crypt V 

The BIG adventure continues. The sequel 
to the popular "Enchanted Forest" is herel 
You'll move in more than 50 hi-rcs, 3-D 
graphic scenes searching for clues in an 
attempt tm enter the crypt. But beware, the 
trail to the crypt is beset with puzzlements. 
In fact, the crypt's secret will remain a 
mystery to all but the most adventuresome, 
Requires 32K extended basic. 
Tape cassette (postage paid) $21.95 



+ Bigfoot 



Hunt Bigfoot in u hidden maze of caverns 
and twisting tunnels that are displayed in 
hi-rcs graphics as you move. Seek out the 
lair of Bigfoot while avoiding perils along 
the way. Features multiple levels and many 
options of play. Each hunt takes place in a 
new, randomly generated maze. Challeng- 
ing and fun. Requires 32K extended basic. 
Tape cassette (postage paid) $21.95 

* The Enchanted Forest 

The BIG adventure in hi -res graphics. 
Move through more than 50 scenes on a 
quest to rescue the captive princess, Deci- 
sions are made according to visual clues, 
not text. There are many inhabitants in the 
Enchanted Forest — some are friendly, 
some are not. This is a smphisticated com- 
puter adventure a real challenge, A 
must for your adventure library. Requires 
32K extended basic. 

Tape cassette (postage paid) $21.95 



* The Game Show 

Now a lively party game where two teams 
compete against the clock to name several 
items in a category. Includes 60 rounds 
with color graphics and sound. Machine 
language routine for fast response. Re- 
quires 16K extended basic and joysticks. 
Tape cassette (postage paid) . .,$19.95 



of Rainbow), 



«h/ in th<- Jan. Itm ls< 



Genesis Software 

P.O. Box 936, Manchester, Mo. 6301 1 



Software fievfowm 



Ambushed By ElBandito 
(And Enjoying It) 

Arcade games come in several fairly standard models The 
primary requirements to make a new entry marketable are 
that ii is a new game, there is a new twist or there are some 
nice bells and whistles. El BancJiia, written by David Cran- 
dall and distributed by Mark Data Products, isa game that 
manages to qualify on all three counts, h runs on a 16K 
CoCo and is played with joysticks, 

First, 1 want to tell you what it is not. It is not. as the name 
implies, a shoot *em type arcade game. It also is not, as some 
may assume, a trade on anything ethnic. 

It is a fast action, maze? chase type arcade game for one or 
two players. The "Bandito" referred to in the title is your, or 
your opponent's, picnic ant, which must steal as much food 
as possible hidden in the maze, and return it to a home lair. 
There are obstacles, of course. 

At the start ol each game you have three "ant lives. 1 ' You 
select a skill level, and a maze difficulty level, each rated 
fr«m I im 8. 

The skill level is easiest to explain. Each level represents 
the number of spiders which can do in your ant. The spiders 
randomly (and rapidly) move about the maze; and if they 
contact your ant, that's the end of the am tile. 

The ma?c remains basically the same, except each higher 
maze level enables more side passages and escape tunnels. 
Your ant may use these, but the spiders may not. Thai 
sounds good until your ant goes in an escape tunnel, and 
materialises in a room full of spiders! 

Points are awarded for various fruit returned to the lair, 
only five points for a banana, but a maximum of 100 for an 
apple. The smallest pointaward, but maybe most important 
is only one point, for an ant egg. With that one point, 
though.comesa bonus life. At ibe bigher skill levels you'll be 
desperate for those extra lives. 

Some t hings which 1 d id not care for, were that the joy- 
sticks respond a bit spongy. After a bit of play, though, it 
seems almost natural and ant-like for the response to be a 
little helter-skelter. Ais». a score continuation feature for 
beating the maj-e would have been nice, but was not 
included. Finally, you have to shut the computer off to 
remove the program. (Piracy made that necessary; it's cost- 
ing us all ) 

Some nice features are the ability to freeze and restart 
play, halt play and start a new game, a continuous "HIGH 
SC#RE" display, and the ability to easily shift from one to 
two player mode. You can mix skill and maze levels for 
almost any degree of difficulty you choose. Perhaps the 
neatest features are ( I ) simultaneous (non-rotational) play 
of opponents, and (2) the ant moves slower when carrying 
food, but may d rop it to escape the spiders. With these two, 
your ant may carry an apple nearly home, only to have to 
drop it to escape a spider. Then, your opp*nent's ant picks it 
up at his door step for an easy 100 points. Fun'? You bet. 
Mark Data has another winner with El Bandito 

(Mark •«<» Product*. 24001 Alicia Pkvry.. No. 207, Mission 
Vicjo. Ca 9269 J. $24.95 on tape. $29,95 on disk) 
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*** PCLEftR SO Software, . . *** 

J ...offers to the Color Cwputer tamuut/ a high 
grade of personal service and ctncern ftr YfDR system 
whether cassette or 54K disk. We have personal! j used 
and abused all the programs in this ad. We've been around 
alwst as lorw as RAINBOW, and Me share the saie feelings 
toward the CoCo and CoCo owners as Lonnie dtes. 

With this in Bind «e offer your choice of the 
foil wins FREE with any order of t&ti.m or sore. If your 
order totals *M.S», m will send both. 

1) PEEK and POKE file. You know you read about that 
POKE soaewheret you just can't retseisber whe e. So you 
either spend an hour flipping through back-issuesi or 
seconds scanning our handy list. 

2) P.D. S8A8-Bfl6: We've accunulated quite a fe* P.D. 
(Public Donain) proarass that we don't think should be 
Halted to folfts with access to bulletin boards. There 
are son great prograss here, including an ON ERROR 
routine and sow nice miic. Kany are not docussnted, so 
expect to do a little mrk with sons, DISK OWNERS fUTEi 
There are tow great disk utilities here . 

If you don't have an order now, we will send you the 
PEEK/POKE file for S3.M and the P.D. BRfiB-BfS for $5.®. 
find on with the show 1 



GOMES ! 



(Comsoft) 



113.95 TAPE 



GOBBLER 32K {Spectral) 

LANCER 32K (Spectral) 

DEATH TRAP (Soft Sector Mkt.) 

A challenging foraat at art attractive price, 

ROBOTTftCK (Intracolor) $24.35 TOPE 

THE KING *32K* (Ton Kin) 126.95 TAPE 

COLORPEDE (Intracolor) $24.95 TOPE 

KEYS OF U IZARD (Spectral) $ 19.95 TO PE 

BlTsiN^ 

TELEURITER— 64 (Cogmtec) 
This may be the BEST word processor 
for (tff hoae coaputer at ANY price! 
T-_I-«?-S...*E.B.« (Sugar Software} 



$21.35 TAPE 
121.35 TAPE 
$13.35 TAPE 



149.95 TAPE 
$59.55 DISK 



$24.95 TAPE 



_.. *16K E.B.* (Rbow Conn. ) 

Screen Formatter /Character Sererator 
with «any outstanding features. $29.95 TAPE 

WORKSftVER (Platim» Software) 435.W TAPE 

The best of all the program*' 5 utilities. 
TftPE TO DISK (Tow Mix) 
DUI — 



117.35 TAPE 
$21.95 TAPE 

- t f»*M* 



TftPE DUPE |Toa Mix) 

all pfmm m jokxt. unless "noto" 

CALL AFTER 6 P.M. ABOUT MK UPGRADES AND OTHER HARDWARE HOIS 

SEND $.58 IN 5TANPS OR COIN FDR YOUR CATALOG TODAY. 
(REFUNDABLE WITH ORDER). 

BE PCtfAft 90 SOFTWARE • 

494 Cllne Avenue 
Mansfield, OH 44907 
(419) 7564873 ^ 

Not©- W© also cany th* RAINBOW «22f 

Add S2 shipping on orders less man $60 Reoseodd 
$2 for COD. Oho residents add 5% state sales tax 
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Old McDonald's Farm Vowels 
A— E— I— O— L 



Old McBonald's Farm Vowels is an educational drill 
program for beginning readers in kindergarden through the 
second grade. The goal of the program is to teach vowel 
sounds to the young reader. The program is written in 
machine language and requires 16K ECU. 

As soon as 1 began reading the instruction manual, it was 
obvious that this was a well documented program. Much 
effort was put into the development and writing of the 
manual. After reading the instructions only Wnce, I thor- 
oughly understood what the program was supposed to do 
and how to use it. (If only the instructions for putting 
Christmas toys together were half as good,) The 'author uses 
detailed examples and portions of actual screen displays to 
describe the program in the I 1-page manual 

Old McDonald's Farm Vowels does exactly what it claims 
to do and that is to drill the student over the long and short 
vowels. Initially, each vowel is pronounced in its long and 
short form and then used in a word. Next, the word is used in 
a sentence to provide the proper context. After this short 
tutorial, the drill practice actually starts. The student is 
presented a graphic display of a farm animal such as a dog. 
goat or pig. The tape player is then turned on automatically 
and a voice articulately pronounces the name of the animal 
and asks the student to indicate whether the vowel was used 
in its long or short form. To respond, the student only has to 
push either the right or left arrow key. 

Correct responses are rewarded by a smiling face and 
"Old McDonald's Farm" is heard. If a response is incorrect, 
the student is given a chit and p rompted to try again. Once 
the correct response is given a smiling face is seen. Negative 
reinf oi cement is never use*. Scoring is kept at the bottom of 
the screen. The scoring format is handled nicely and allows 
the parent or teacher to easily determine which items were 
missed on the initial try. 

Old McDonald's Farm V»wels hasexcellentgraphicsand 
the author used good creativity in designing the format of 
presentation. There are several bells and whistles that make 
the program interesting, and each *ne adds to the educa- 
tional value of the program. They are: 

I) The score is constantly displayed on the screen so that, 
the student can see his progress. 

2} A surprise graphic is displayed at the end of the exer- 
cise if the student gets all items correet. 

3) The exercise can be made more or less difficult by 
changing the allowed response time. 

4) The scoring display provides a reeord of eorrect and 
incorrect responses. 

5) The correct arrow key responses are randomized to 
help eliminate positional memorization o( inputs. 

If you are looking for a good educational program for 
your child, 1 think this would make an excellent collection 
for your library. 

(Tehsym Corp., 14504 County Road 15, Minneapolis, MN 
55441, $14.95 on tape) 

-Michael K. Hunt 
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(continued f ram page 14 ) 

One of the things which has confounded me for some time 
now is why we do not get more submissions from teachers, 
their students and from computer classes and/ or clubs in 
sehools. 

In thinking about that, it seems to me that one of the 
reasons may stem from the same reason as why we do not get 
more submissions for non-Extended Color BASIC programs. 

I have long believed the reason we do not get non- 
Extended programs is because most of the people who have 
non-Extended CoCos are beginners. And, seeing the many 
well-written and innovative programs we publish, they feel 
their own efforts might not be "up to snuff" for us to use. 

By the time someone upgrades to Extended, he has some 
expertise and feels more comfortable making a submission. 
And so, many of the programs you see in the Rainbow are 
for Extended. 

We were all beginners. And 1 want to say here, for the 
record, that we encourage the submission of non-Extended 
programs. Often, 1 find, heginners have some of the freshest 
ideas and do some of the most creative programming. 

As to youngsters, many of them are beginners, too. But I 
am frankly surprised that we have not seen more submis- 
sions from them. 

One of my long-time interests has been for a youngsters' 
section. We at the Rainbow are most interested in encourag- 
ing young people and their use of CoCo. Such a section 
could be devoted to their programs — and would be an 
interesting outlet for young people to share some of their 
programs, ideas and techniques. 

We would like to have a section of this son, but can do so 
only with your help. If you are a youngster, please send a 
program or two to our Submissions Editor. And, when you 
do, please let us know how old you arc. OK? 

And, for all the teachers and students who are reading 
this: Why not make it a project this fall to do something for 



EJp VALHALLA, 



VENTURE WITH YOUR LEGIONS INTO THE MYSTICAL LAND OF 
VALHALLA TO CONOUER ALL AND REIGN SUPREME IN THIS TOTALLY 
HI-RES, COMPLETELY JOYSTICK CONTROLLED. STRATEGY GAME. 
THE BEAUTIFULLY DETAILED TERRAIN MAP INCLUDES CASTLES, 
VILLAGES, ROADS. RIVERS. SWAMPS, LAKES, BAYS, AND MOUNTAINS. 
TWO TO FOUR PLAYERS CONTROL SIXTEEN ARMIES LED BY LORDS, 
GENERALS, OR CAPTAINS. EACH ARMY FEATURES HEAVY CALVARY, 
LIGHT CALVARY, FOOT SOLDIERS, AND ARCHERS. 
A SUPERB GAME FOR ONLY $24.95. 



CHECK OR MONEY 



AVAILABLE ONLY FROM P.O. BOX 15331 
ORDER ONLY 'HYCOMP* 

all orders 1 50 shipping. games reouire 32k, ext. basic, and 
Due to memory requirements are available only on cassette 



COLONIAL TRILOGY 



colonial wars: one player commands the colonial 
homeworlds and all their forces while the other player 
leads the invading zyron empire the ultimate in two 
player strategy games with hycomp's unique split screen 
concept, game save, and 10 page instruction manual(3-8hrs) 
zyron: the siege over one qf the colonial homeworlds 
and the attempt to break it is the setting for this two 
player game features include custom built fighters and 
freighters, 300 location hi-res playing grid, seven page 

MANUAL. TWO SCENARIOS. AND PLAYING AID <2-4hrs) 

QUESTAR. one player explores over 30 planets on a 

DARING MISSION to destroy A HIDDEN ZYRON BA3E IN THIS 
EXCELLENT GRAPHICS ADVENTURE (60-90min) 

ONLY $19.95 EACH OR vLS? 

ALL THREE FOR $49.95! . . 



submission to the Rainbow"} No, we certainly cannot gua- 
rantee we will print everything — but if we get sufficient 
response we can institute a special feature each month — 
perhaps with photos of the class at work. 

1 want to report here a story which reaches me with mixed 
emotions. 

No doubt you have seen me mention the name of Jon 
Shirley, the vice president for computer merchandising for 
Radio Shaek, in this space before. Jon announced this 
month that he is leaving Radio Shack to accept a position 
with Microsoft, Inc. in Washington State. 

All of us owe a debt of gratitude to Jon Shirley. It was 
under his administration that the Color Computer came to 
be and it has been through his work that CoCo has become a 
"word" in so many thousands of households. Thank you, 
Jon, from so many of us. 

Next month will mark the beginning of our Second 
Annual Adventure Contest! The first contest was one of the 
highlights of the year f or us and wc look forward to another 
great one. 

You will see the formalannouncementnext month, but it 
might be wise to start considering an entry now. I believe 
ynu will be impressed with the prize list. 

And, speaking of contests, the Simulation Contest has 
some really excellent entries. We'll be naming the winners 
soon and printing their programs. So, stay tuned. 

Judging from my mail, it appears that the record in the 
Anniversary issue was an unqualified success. With a few 
exceptions, everyone who wrote (and there were hundreds 
of you who took the time to do so) thought binding in a 
record was an excellent idea. 

The proposal that we increase the price of the Rainbow to 
finance a record each month generated comments ranging 
from wild enthusiasm to concern for cost. And, the bottom 
line appears tn he that we will not do it as a regular feature. 

The reason is simply that the record adds something like 
25 cents to the cost of every magazine, once the manufac- 
ture, binding, mailing and other associated costs are taken 
into account. That, coupled with two additional facts, 
makes it an unwise move on our part. 

Fact One is that the cost to us I quoted above is based on 
what is, essentially, a three-program record. To do more 
would cost considerably more. 

That, in and of itself, seems to be satisfactory to a majority 
of those who wrote. But Fact Two is simply that we are 
forced to raise our cover price next month, anyhow. Effec- 
tive with the October issue, single copies of the Rainbow will 
cost $3.95. There is no change in the subscription price. 

Why arc we raising the cover price? First, because the cost 
of paper has gone up again, as has the cost of just about 
everything else that we do. The $2.95 cover price was set a 
year ago this month — when we had 106 pages. The number 
of pages has tripled since then. 

The second reason is that shipping costs have increased as 
well. Part of this is due to rate increases. The other to the 
sheer size of the Rainbow. Last month's issue weighed in at 
over 20 ounces! 

Will there be a subscription price increase? Yes, in time. 
But, bef ore we do, we will let you know here — and give you 
to opportunity to extend your subscription at the present 
rate. For now, though, our increase in price affects only 
single copy sales. 

— Lonnie Falk 
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Not one, but two new Color Computers are in the fall 
lineup from Radio Shack. 
The 64K. Color Computer, (see cover) from an "inside" 
point of view, merely confirms what many of us have known 
for a long time — that just by making a few internal changes 
the "32K Color Computer" could become, in effect, a 64K 
machine. 

However, the introduction of the 64K CoCo also coin- 
cides with the introduction of the OS-9 software package, 
providing a true disk operating system from Radio Shack 
for the first time. Yes, OS-9 has been rumored for many 
months, too. But. now, here it is. 

And make no mistake about it— it's a full-Hedged disk 
system based on the popular UNIX system (the Bell Tele- 
phone Laboratories operating system for large minicompu- 
ter systems), St comes with an editor, assembler and a 
debugger. With four hefty manuals to explain things. 

This month's Pipeline is devoted to 
Radio Shack's two new Color Compu- 
ters. An artists's sketch of the Color 
Computer 2 appears above. 

Photos of the 64 K. CoCo and an in- 
depth view of the OS-9 appear on page 

236, 

Not completely expected is the second major Radio 
Shack CoCo— the Color Computer 2. It is smaller than the 
"traditional" CoCo. thanks, primarily, to some excellent 
design and engineering at Tandy Corp. And, with one single 
exception, it is electrically the same as its larger brothers. 

What do these two new CoCos have in common?: 

For one thing, their color. It isn't white, but fawn gray— 
an off-white if you will. 

For another, both feature a new keyboard- with three- 
color sculptured keys which have more "travel" than the 
"old" CoCo keyboard. 

And, both are, essentially, software compatible with every 
Color Computer which has ever been produced (TDP-I Ofls, 
too). 

But, much more than that, the new Color Computers 
position Radio Shack squarely in the middle of the personal 
computer market for some time to come. These are well- 
built machines, based-on the state-of-the-art 6809 micropro- 
cessor from Motorola. Especially with their new colors they 
are attractive, durable and— because of the software capa- 
bility — come to the marketplace with a vast library of pro- 
grams which can be run today. 

The 64K CoCo featured on this month's Rainbow cover is 
available now from your local Radio Shack, So, too, is the 
OS-9 software. The computer sells f orS399 and the software 
for S69.95. (For more details on OS-9, see technical editor 
Dan Downard's article on the new 64K CoCo in this issue). 

Color Computer 2 should be available within weeks. The 




non-Extended BASIC version will retail for S239.95. Ex- 
tended basic goes for $319.95. And, yes, you can buy the 
keyboard separately— for $39.95 plus installation, 

The 64K CoCo 

There is really no internal change between the 64K Color 
Computer and the one which Radio Shack has been selling 
for some months. One of the worst-kept secrets for some 
time has been that the 32K Color Computer was equipped 
with 64K. chips which, likeas not, with some little modifica- 
tion, could support a "bank-switched" system. 

By "bank-switched" we mean that either half of the 64K. of 
RAMcould be accessed at a time Programmers soon found 
ways to use the "other" half of the R A M for several different 
purposes— everything from storing variables to using that 
part of the memory as a disk-like storage area for whole 
programs 

Additionally, a number of language systems, with FLEX 
being the most popular, were able to use the whole 64K. 
OS-9 will operate in the same way. 

This, incidentally, is no different than the "64K. compu- 
ter" advertised by other firms, such as Commodore. What 
the Commodore lacks, among other things, is a state-of-the- 
art microprocessor like the fiR09 And a sophisticated oper- 
ating system. 

A look at the motherboard of the new 64K CoCo shows it 
to be, essentially, no different than the ones already for sale 
by Radio Shack. Some capacitors have not been installed 
and thejumpersare set to 64 K. at the f actory. That is what we 
have been telling you for months you should do to 
"upgrade" your F-Board CoCofrom 32K. to64K, Ofcourse, 
the 64K. chips are included—and certified 100 percent. 

Electrically, this is the samecomputer with some cosmetic 
changes. But what changes! 

The new color should make CoCo a much more welcome 
addition to the home. It blends in with most any decor. And, 
because the color is moulded into the plastic cabinet, you 
end up with a machine from which the color will not wear 
off. It should be easier to clean, too. 

The keyboard is a great improvement. The keyboard 

colors white, fawn gray and red -blend in well with the 

case itself. The keys are wider, flared out, and have better 
tops than the previous ones available from Radio Shack 

They have more "travel" too. That is, they move further 
down when pushed. Though they stop somewhat short of 
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what a touch-typist would consider "f ull-travel," they are a 
vast improvement for one of the areas which spawned the 
most complaints about the original CoCo. Their color coor- 
dination gives them, and CoCo, a more complete look, too. 

And, while the only other change is the location of the 
Radio Shack logo, the c#lor somehow makes the new CoCo 
look more sleek, We spent several minutes comparing the 
"battleship gray" and fawn gray models before reaching the 
conclusion that there is no difference between the cases. Yet, 
the new one looks "better," somehow. 

Inside, the only difference is the existence of a bronze clip 
which rests atop the RF shield and presses up against the 
bottom of the keyboard— which is covered with metal. We 
assume this is a grounding adjustment. 

Color Computer 2 

The first thing one would notice in looking at Color 
Compu ter 2 (CoCo 2) is that it is quite a bit smaller than its 
older brother. Here, Tandy engineers have performed some 
wonders in compressing everything (yes, everything) into a 
case which is about two-thirds the size of the original. 

Again, CoCo 2 features the f awn gray— slightly sleeker— 
case, sports the new keyboard and is, essentially, the same 
electrically as the 64K model. 

The one difference, electrically, f romearlier CoCos is that 
CoCo 2 does not have a 12-volt power line running to the 
expansion port. A few pieces of equipment which draw 
p«wer from the 12-volt line (including Tandy's own X-Pad) 
will have to undergo modification to use CoCo 2. 

While available as a I6K model for both non-Extended 
and Extended BASIC. CoCo 2 is upgradable all the way to 
64K. At least, we understand, that is possible and it should 



be, because CoCo 2 has the same logical workings (and 
ehips) as does every other Color Computer thus far sold. 

It is almost worth breaking the factory seal and voiding 
your Radio Shack warranty tosee how it wasdone. Some of 
the ideas are easy to spot— others buried in the well- 
designed motherboard. One of the most obvious is the turn- 
ing of the RF mod ulator on its side. It now takes up less than 
a third of the space on the board. 

CoCo 2 should be a big seller. It is nice looking, compact, 
and priced right. It is upgradable and, again, has a wealth of 
software available f or it. 

New ROMS 

Both the 64K CoCo and the CoCo 2 feature the new 
ROMs, which have been a part of every Color Computer 
shipped in recent months. These ROMs fix a number of 
problems with the original version of the operating system, 
but may be a problem for some machine language programs 
which us»d what Radio Shack calls"undocumented" calls to 
the ROMs. 

Most software manufacturers have been aware of the 
problem already, and will offer modifications to their pro- 
grams when necessary, As a service to machine language 
programmers, Technical Editor Dan Downard, offers a 
rundown on the changes to the ROM. 

Those lucky enough to have seen the new CoCo thus far 
have been favorably impressed. Radio Shack, we under- 
stand, is bullish on the two new models and more support is 
on the way. 

With its sleek new styling, model alternatives and a full- 
blown and sophisticated operatingsystem, we see the future 
as exceedingly bright for »ur favorite computer. ^ 




Software RevIewSSI^^^^^ K2\ 

Fast Reflexes? 
Youll Like Fast Lane 



When 1 first read the directions for Fast Lane, the idea of 
the game intrigued me, After playing the game f»r several 
hours with a few friends, we all decided it was rather 
hopeless. 

Fast Lane is a machine language, arcade-type game, the 
idea of which is to steal weapons from the enemy. When the 
game begins, you find yourself on the right side of a screen 
full of space traffic. You must maneuver your spaceship, 
using the arrow keys, to the left side of the screen. The faster 
you accomplish this, the more fuel you will save, and the 
more points you will receive. Having done this, you now go 
to the second screen. Here you have entered the enemy 
spaceship which has electrified walls and moving guards. 
You enter on the right side of the screen and must get 
through the rooms via the doors, which open and cl»se, to 
the weapon in the upper left corner. After you get the 
weapon you must return it to the lower right eorner. Again, 
you must do all of this before your fuel runs out. 



If you succeed in stealing the weapon your score so far, 
will be shown. Y»u then push the spacebar to g» to the 
sec»nd level which is supposedly more difficult. You can 
push the "P" key to pause your game any time during the 
play. 

The biggest drawback to this game is the fact that it uses 
the arrow keys for movement. It would play much smoother 
and faster if it used the joysticks. The directions say, "you 
should only tap the arrow keys" to move your spaceship. 
However, even in tapping, (especially for right-left move- 
ment,) the keys are just too sensitive. You will usually end up 
smashiog into a wall. 

Fast Lane requires very fast reflexes, which I don't have, 
so I invited some friends to try their skills, Of four different 
people trying the game for a eouple of hours, the highest 
scorer got 93 and she was only able to get through the first 
screen. 

The graphics are fairly g»od, but simple — nothing spec- 
tacular. Rating the game on a scale »f 1 (worst) to 10 (best), I 
would have to give it a 4. It isa game you easily get frustrated 
with before you get good at it. 

(Acesoft Computer Products, 1680 North Page Drive, Del- 
tona, FL 32725, S24.95 cassette) 

—Jim Stewart 
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Software Review! 



'Cooling It' Is A Breeze 
With CoCo-Cooler 



It has just oceurred to me that I now have a minirrium of 
six switches to turn on just to get my CoCo up and running. 1 
have to turn on the monitor, Drive 0 and Drive I, the 
multi-pak interface, the computer itself and CoCo-Cooler— 
the subject of this review. 

Well, six switches or not, since installing a CoCo-Cooler 
on our 4K turned 64K machine, I would hesitate to use the 
CoCo without it— reason heing that it very effectively covers 
all the air vents on the left side of the computer and, thus, if 
Unused it would make the machine get even hotterthan it did 
prior to installation. 

Who needs a CoCo-Cooler? Let me tell you, I practically 
had to be hit in the head with a board to becomeconvinced I 
did. You see, I*m not one who stays up nights worrying 
about replacing the SAM chip if it should overheat. And, 
several weeks ago when I noticed some weird stuff happen- 



—NEW! 
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—DEMON'S DEFIANCE 

Fresh from th* fertile imaginaliort «f BASIC Graphics Matte/— Fred 
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For 16K CoCo or4K MC10 . cassette, $14.96 
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P.O. BOX 66 
PETERBOROUGH, NH 03458 

(603) 924-6065 
(COD add $3.00) 



iftg on the sereen, I immediately blamed it on the disk 
controller which deserves most all of the blame it gets, 
exeept this time. 

Though the top of the machine was hot enough to cook an 
egg on, I exhausted every remedy before deciding that 
maybe — just mayhe I might be suffering from that dread- 
ed malady "hot CoCo," (tacky, but irresistihlc). Well, 
CoCo-Cooler cooled my machine and my temper. 

As advertised, CoCo-Cooler takes about one minute to 
install; you just remove the protective strips covering the 
adhesive, align it with the side of the machine, press it into 
place and plug it into a wall outlet. That's it. The CoCo- 
Cooler is contoured to fit snugly in place and the adhesive 
will sure enough keep it there, once placed, so don't misalign 
it. 

In use, the CoCo-Cooler keeps things cool and calm 
inside your machine, even if a"basket case'Ms pounding the 
keyboard. While I haven't gone to the extreme of placing 
thermometers inside and outside the CoCo to test CoCo- 
Cmoier's effectiveness, the top of the machine is now cool to 
the touch whereas it had been markedly warm before. 
According to figures supplied by the manufacturer, REM 
Industries, Inc., in tests during which r«»m temperature was 
controlled at 80 degrees, temperature readings were taken 
on the computer case surface just above the power supply 
and, without CoCo-Cooler. a 16K machine's temperature 
rose tp 98 degrees while a64K machine hit I lOdegrees, With 
CoCo-Cooler then attached, both machines cooled off 
rapidly in 15 minutxs — and at the end of an hour the 16K 
machine registered 84 degrees while the 64 K. machine had 
leveled off at about 88 degrees. What more can you ask? 
Well, maybe a couple of things. 

While I have no complaint about CoCo-Cooler's effec- 
tiveness, 1 do wish the fan was a bit quieter. True, it makes 
no more noise than my electric typewriter does- but, then, I 
turn my typewriter off and on several times a day just so ! 
don't hearthat, albeit slight, extra noise or fee) the vibration. 
Personally, I think a smallerfan might do the jobjust as well 
and perhaps a measure quieter. Both the fan housing and the 
fan blade itself are made of high impact plastic and offer 
little chance of tiny fingers getting into the wrong place. All 
in the cause of consumer safety, hawever, i deliberately 
stuck my finger into the fan and, I'm glad to report, the blade 
stopped easily. 

While it poses no problem in my particular situation, I 
should point out that the CoCo-Comler does extend five 
inches out from the left side of the computer — about the 
same distance the disk controller juts out on the right side. 
This could possibly pose a problem for those with compact 
installations — the very same people who are most likely to 
have overheating problems. 

AH in all, CoCo-Cooler does exactly what it is supposed 
todoand itdoeshave the professional look otaquality pieee 
of hardware that is designed t o do a specific job as efficiently 
as possible. Individual circumstances will dictate whether 
you do or don't need a cooling fan for your CoCo, but, if you 
do, CoCo-Comler is as welcome as a cool breeze. 



(REM Industries, Inc., 9420 "B" Lurline Ave., Chatsworlh, 
CA 91511,539.95) 

-^Jim R*ed 
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Software Ravlawm 



Mathmenu — A Cornucopia 
Of Mathematical Programs 

By Dr. David Finkel 

Do you solve mathematical problems in your job? Do you 
need help with your math homework? Or are you just inter- 
ested in exploring mathematics? If you answered "yes 11 to 
any of these, then you ought to consider Mathmenu, from 
Inter+Action. As a mathematician (Dr. Finkel teaches 
mathematics and computer science at Bucknell U niversity.), 
I enjoyed using these programs; perhaps you will, too. 

Mathmenu is a collection of 15 mathematical programs, 
ranging in size from about IK to over 9K. They arc all 
well-writ ten, Well -documented, a nd — with a f ew exceptions 
mentioned below — present mathematically valid approach- 
es to solving problems. 

The most impressive of the programs is the surface plot- 
ting program, 3D PLOT, which draws high resolution pl»ts 
of three-dimensional surfaces on the PMODE4 screen. The 
program begins with a menu of choices. One choice gives 
you several screens of information on how to use the pro- 
gram. Another allows you to enter the function to be 
graphed, Y»u do this by entering Y as a f unction of X and Z 
in standard Color Computer notation, like Y = X*X + 
SIN(X). 



In addition to specifying the function, you have to specify 
the range of X and Z values to be shown on the screen; these 
automatically determine the range of Y values. You can 
also, through the use of the Special Features Menu, control 
the Y axis scale, the Z axis scale, and the graphing resolu- 
tion. All these options make for a flexible and powerful 
graphing capability. You might have to try several different 
settings of the graphing parameters before you get the graph 
just right. Fortunately, it'scasy to do this; you can return to 
the menu at any time, erase the current graph, change 
parameters, and start graphing again, all in a few seconds. 
You also have the option of graphing more than one func- 
tion on the same screen. 

Once you get a graph just the way you want it, you might 
like to save it. You can save graphs to tape or disk through 
the Special Features Menu, which guides you through the 
necessary steps. The Mathmenu package comes with two 
sample graphs already saved, but I wasn't able to load either 
of them. However, the graphs I saved to tape myself loaded 
without any problems. One way to use this save to tape or 
disk feature is for class demonstrations. You can spend ali 
the time you need beforehand getting the graph to look the 
way you want, and then demonstrate the finished product. 
And, you can use it to impress your friends. 

This 3D PLOT program is easy to use, clearly docu- 
mented and very useful. 1 do have some suggestions for its 
improvement, though. First, the axes are turned around 
from what's standard in math books. Usually, three- 
dimensional graphs are drawn with the Z axis going up, the 
Y axis going to the right, and the X axis coming out at you. 
There's no special reason for this arrangement, but it is 
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standard; look in any calculus book. Mathmenu has the 
axes turned around. Also it has Y as a f unction of X and Z, 
instead of the usual Z as a function of X and Y. Finally, it 
would help if there were more examples of how to use the 
various graphing parameters. This program has many pow- 
erful options and some examples would help the novice 
learn how tf use them more quickly. 

In addition to 3D PLOT, there are 14 other programs in 
this package. I'll describe them in less detail. 

2D PLOT works like 3D PLOT, bul does two-dimen- 
sional plotting. It's somewhat easier to use, since two- 
dimensional plotting is simpler than three-dimensional plot- 
ting. It also offers the save to tape or disk feature, 

MATMfXOP and VECTOROP do matrix and vector 
calculations, on matriees up to size 8 by 8, and vectors with 
up to 20 entries. They perform all the calculations you might 
like: matrix sum, difference, and product; transpose, in- 
verse, and determinant; and vector sum and difference, cross 
and dot product, length of a vector, and angle between two 
vectors. The calculations are all done with good accuracy, 
subject to thelimitations of the Color Computer's numerical 
operations — about eight accurate places. Since matrix cal- 
culations can involve a large number of individual calcula- 
tions, the small round-off error f rom each one can accumu- 
late and cause a significant error in the final result. This is 
especially a problem if the matrix contains both very large 
and very small entries. Use the results from such calculations 
with caution. 

There's an unfortunate bug in MATRIXOP. If you enter 
a singular matrix — that is, one whose determinant is *:ero— 
the program correctly identifies the matrix as singular, but 
then prints out a non-zero number f orthedeterminant. The 
author assures me that this bug is being corrected, 

Two programs perform numerical calculus functions. 
/Vt/A/.DAF/Vcalculates approximatederivatives, and NVMIN- 
TEG calculates approximate definite integrals. The deriva- 
tive at X is approximated by (F(X+h)-F(X))/h. where h = 
,000OI*X, Because of this fixed formula for h, the approxi- 
mation may beunreliable if the derivative Or the value of X is 
large, NU Ml NT EG approximates the integral by S impson's 
Rule. In this program, you choose the number of intervals, 
so you can make the approximation as accurate as you like. 

The program LSTSQRS finds the best fitting curve to a 
set of up to 100 data points. After you choose whether you 
want to fit a linear, quadratic, or cubic curve, the program 
displays the best fitting equation, according to the usual 
leastsquarescalculations. If you want to do serious analysis 



of curve fitting problems, youli probably want more than 
this program offers: more kinds of curves, a graphics capa- 
bility, and ways of examining how well the points fit the 
curve. But LSTSQRSdocsa good job of basiccurve f itting. 

There are two other programs that are a lot of fun, 
although it's hard to imagine practical applications for 
them. LGttADD and LGUMULT add and multiply large 
numbers exactly, with no round-off error. LGttADD han- 
dles up to 100 digit numbers, and LGUMULT up to 30 
digits. Whether or not you need to do calculations with 101 
place accuracy, it's nice to be able to, just to show off. 

There are six more programs that do fairly routine calcu- 
lations. QUADEQN finds the roots of q uadratic equations, 
PRIME CK cheeks numbers up to one million to sec if 
they're prime or not, BINOMEXPc&\?ul&te$ binomial coef- 
ficients, BASECONV converts numbers from one number 
system to another, f or example f romdecimal to hex, RECT- 
POL converts coordinates between the rectangular and 
polar systems, and flPLallows you to use your Color Com- 
puter like a Reverse Polish Logic calculator. All these pro- 
grams are easy to use, and perform their f unctionsaccurate- 

iy. 

All the programs in Mathmenu, except 1 or the graphing 
programs and RPL, allow you to print the results *ut on 
your printer. The graphing programs include instructions 
for using your own screen print program to print out the 
graphs you've created. 

Throughout the package, the on-screen instructions are 
outstanding. Each program includes instructions explaining 
what the programdoesand how to use it. Clear prompts are 
givenf orenteringthedata,andf or starting the calculations. 
The printed documentation is adequate, but would be 
improved with the addition of more examples, especially for 
the graphing programs and for MPL. 

And now for the big question: should you buy Math- 
menu? First, the programs in Mathmenu are excellent. They 
provide a wide range of useful mathematical functions in an 
easy to use format Second, the price is a real bargain for a 
package of 15 programs. The two graphing programs alone 
a re well worth the price. So, if you have use f or even a f ewof 
these programs, for work or school or your personal inter- 
est, you'll get your money's worth from Mathmenu. 

(Inter+Actipn, 113 Ward St., Dept. R» New Haven, CT 
06519, $44.95 for 16K up*, S49.95 for 32K disk, ECB) 
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discount. Call lor more info! 


TRS-80 Color Computer 

(TDP) Disk Drives 

Drive 0 $415 

Drive 1 $245 


Wabash Diskettes. 1 year 
warranty. Certified 1 00% 
error free, w/hub rings, 
SS/SD $17,50/boxof 10 
SS/DD $19.95/boxof 10 


All equipment carries manufacturers 
warranty. Prices do not include shipping. 
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TURN OF THE SCREW 



GI Sound Generator: Software 
Control For Complex Sounds 

By Tony DiStefano 
Rainbow Contributing Editor 



Last month's project was a practical one. This month 
we'll have some fun. How about making some 
interesting sound effects',' Well, III show you how to 
interface the General Instrument's programmable sound 
generator number AY-3-8910 to the Color Computer. The 
features of this chip according to Gl are: 
•Full software control of sound generation. 
• Interfaces to most 8-bit and 16-bit microprocessors. 
•Three independently programmed analog outputs. 
•Two 8-bit general purpose I/O ports (AY-3-8910). 
•Single +5 V»lt supply. 

This Programmable Sound Generator (from now on, 
known as the PSG) is a LSI Circuit which can produce a 
wide variety of complex sounds under software control. Its 
flexibility makes it useful in applications such as music 
synthesis, sound effects generation tone signalling and even 
FSK modems (with a little extra circuitry). All of these 
sounds ean be produced with just a few simple POKEs, 
leaving the processor free to do other tasks like calculating 
more sounds, updating the sereen or doing graphic anama- 
tion (in thecaseof arcade typegames). *ne or two pokes can 
produce sounds that carry on for several seconds, or even 
continuously. 

This PSG is a register-oriented device. This means that 
communication between the processor and the PSG is based 
on the concept of memory-mapped 1/ •. The control com- 
mands are issued to the PSG by wn\\r\g( POKEs ot ST A$)io 
two memory locations. The first location (memory mapped 
at bex address F F65) is to select whicb internal register you 
wish to aeeess. The second memory location is for the data 
you wish to enter or retrieve and is at hex address FF64. All 
functions of the PSG arc controlled through 16 registers 
which once programmed, generate and sustan sounds on its 
own. More on how to program it later. 

Refer to List #1 togetalltheparts needed for this project. 
It is not hard to put together, but like any electronic project, 
eareshould be taken when working with statie sensitive ICs, 



(Tony BiSiefano is well known asan early specialist in 
Color Computer hardware projects. He is mne «f the 
acknowledged experts on the "insides" of CoCo.) 



Quantity Part ft Desc 

1 AY-3-8910 PSG 

I 74LS133 TTL 

I 74LSI4 TTL 

1 74LS157 TTL 

2 16 PIN SOCKET 
I 14 PIN SOCKET 

1 49 PIN SOCKET 

2 .01 l)F CAPACITORS 
1 10K OHMS RESISTOR 

I PROJECT BOARD RS # 276-163 



LIST ft 1 

With theschematic(Diagram I) in onehand and a solder- 
ing iron in the other, it's time to put the board together, Start 
by getting the ground and B-Plus buses wired in. It is best to 
wire all the connections to the connector on the side of the 
board that has the lowest number. That's the side with the 
number one on the edge. The two buses run close to the edge 
connector, it will be easier to connect im. Refer to Diagram 2 
f or the proper layout of the sockets. The rest of the soldering 
is quite straightforward. Follow the schematic and cross off 
each I ineaf ter it's done. This will eliminate any missed wires. 
When you are finished, clean the board in the usual manner. 
Check again the wiring with the schematic, remember that 
the Y'eris not buffered and is notforgivingof wiringerrors. 
A short can eause many headaches. When you're finished, 
insert the chips (remember pin Vs) and plug it in. Turn the 
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GI PRDGPflnnAftUE SOUND GEflEPATEP 
FOR THE (?A»IG SHflCk 80C 
SV TOwy DISTEFHNO 




computer on, when you gel ihe familiar sign on, turn up the 
sound, type in and RUN this program. 

10 AUDIO ON 

20 POKE SHFF01.5HB4 

30 POKE &HFF03.&H3F 

40SR = &HFF65: WD = &HFF64 

50 POKESR,RND(15)-l : POKE WD.RND(256)-I : 
GOTO 50 

This short program will generate ramdom sounds, beeps, 
pops, and whistles in the speaker of your TV. This is more or 
less just a test to make sure that the circuit is working. (You 
will have to use your imagination to come up with better 
software.) If you do not get any sound, check the wiring 
again; this circuit does work. I have a working model right 
here in front of me. Here, just put your ear a little clmcrand 
listen. Can you hear it'.' I told you it works. Okay, enough 
foolin' ar«und, the following descriptions of the PSG are 
excerpts taken from the GI product description manual. 

Sound Generating Blocks 

The basic blocks in the PSG which pioducc the pro- 
grammed sounds include: 

Tone Produce the basic square wave tone frequencies 

Generators for each channel (A, B, C) 
Noise Produces a frequency modulated pseudo ran- 

Gcneraior dom pulse width square wave output,. 
Mixers Comhinc the outputs of the Tone Generators 

and the Noise Generator One for each 

channel (A. B, C). 
Amplitude Provides the D/A Converters with either a 
Control fixed or variable amplitude pattern. The 

fixed amplitude is under direct CPU control; 
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the variable amplitude is accomplished by 
using the output of the Envelope Generator. 
Envelope Produces an envelope pattern which can be 
Generator used to amplitude modulate the output of 
each Mixer. 

pi A The three D/ A Convcrtcrseach produce up toa 

Converters 1 6 level output signal as determined by the 
Amplitude Control. 

Operation 

Since all functions of the PSG are controlled by the 
processor via a scries ol register loads, a detailed description 
of the PSG operation can best be accomplished by relating 
each PSG function to the control of its corresponding regis- 
ter. The function of creating or programming a specific 
sound o r sound ef f ect logically follows the control sequence 
listed: 



Operation Registers Function 

Tone Generator Control R0-R5 Program tone- periods. 

Noist- Generator Conirol R6 Program noise period. 

Mixer Control R7 Enable lone and or noise 

on selected channels. 

Amplitude Control R I O-R 1 2 Select "fixed" or "envelope- 

variable" amplitudes. 

Envelope Generator 
Control RI.1-RI5 Program envelope period 

and select envelope pattern 



Tone Generator Control 

(Registers R10, Rl, R2, R3, R4, RS) 

The frequency of each square wave generated by the three 
Tone Generators (one each for Channels A, B. and C) is 
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Coarse Tune 
Register 
Rl 
R3 
R5 



Fine Tune 
Register 
RO 
R2 
R4 



^ V s 



ll-M To«i P»r,oc( (TP) to Tw« OvW'Mor 



Noise Generator Control 
(Register R6) 

The frequency of the noise source is obtained in the PSG 
by first cutting down the input clock by 16, then by further 
counting down the result by the programmed 5-bit Noise 
Period value. This 5-bit value consists of the lower 5 bits 
(B4-B0) of register R6. as illustrated in the following: 

Noise Period 
Register R6 



is determined by the contents of the lower 5 bits(B4-B0) of 
registers RIO, Rli, and RI2as illustrated in the following: 



Amplitude Control 
Register 
RIO 
RM 
R12 



0 EEE3SE 



Envelope Generator Control 
(Registers R13, R14, RI5) 

T» accomplish the generation of fairly complex envelope 
patterns, two independent methods of control are provided 
in the PSG: first , it is possible to vary the frequency of the 
envelope using registers R 13 and R 14; and seeond, the rela- 
tive shape and cycle pattern of the envelope can be varied 
using register RI5. The following paragraphs explain the 
details of the envelope control functions, describing first the 
envelope period control and then the envelope shape/ cycle 
control 



Mixer Control— !/• Enable 
(Register R7) 

Register R7 is a multi-function Enable register which 
controls the three Noise/Tone Mixers and the two general 
purpose I/O Ports. 

The Mixers, as previously described, combine the noise 
and tone frequencies for each of the three channels. The 
determination of combining neither/either; both noise and 
tone frequencies on each channel is made by the state of bits 
B5-B0orR7. 

Thedirection (input or output) of the two general purpose 
I; O Ports (IOA and IOB) is determined by the state of bits 
157 and J86 of R7. 

These functions arc illustrated in the following: 

Mixer Control — I/O Enable 
Register R7 




Amplitude Control 
(Registers RIO, R II, RI2) 

The amplitudes of the signals generated by each of the 
three D/ A Converters (one each for Channels A, B, and C) 



Envelope Period Control 
Registers R13, R14) 

The frequency of the envelope is obtained in the PSG by 
first counting down the input clock by 256, then by further 
counting down the result by the progrmmed 16-bit Envelope 
Period value. This ! 6-bit value is obtained in the PSG by 
combining the contents of the Envelope Coarse and Fine 
Tune registers, as illustrated in the following: 



Envelope 
Coarse Tune 
Register R14 



Envelope 
Fine Tune 
Register R13 



Envelope Shape/ Cycle Control 
(Register R15) 



The Envelope Generator further eounts down the enve- 
lope frequency by 16, producing a 16-state per cycle enve- 
lope pattern as defined by its 4-bit counter output. E3 E2 E 1 
EO. The particular shape and cycle pattern of any desired 
envelope is accomplished by controlling the count palteru 
(count up/ count down) of the 4-bit counter and by defining 
a single-cycle or repeat-cycle patcrn. 

This envelope shape/cycle control is contained in the 
lower 4 bit (B3-B0) of register RI5. Each of these 4 bits 
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» CC SOFTWARE 

» • UNIVERSAL. PROGRAM KUP-l? • 

» Known as the Program Stacker, Uf 
» several programs to be loaded until the 

• filled. Quickly jump •from one program t 
» or compose new programs while retaining the old • 
» ones. Data or ML program* can tew stored and re- * 
» trieved from a cassette. Characters or values can • 
» be written to memory and memory contents cart be * 
» examined. Text can be composed and stored in mem- * 

• ory and printed on an external printer. • 
► UP-I Cassette S14.95 * 

» » 0 1 S ASSEMBLER- ASSEMBLER (■ISflSM) » * 

j Decimal Locations, • 
i to assemble machine • 
, Subroutines can • 



controls a function on the envelope generator, as illustrated 
in the following: 



• Using English mnemonics « 

• DIBABn is an easy way to learn 

• Language Programs or Subroutir 

• be used with Basic Programs and calli 
» USR er EXEC commands. For CC compi 

• locations are given in Decimal e! 

• confusion associated with HEX. All 

• Menue oriented fer easy entry. The Disassembler * 

• can be used to Analyze Machine Language Programs • 

• as well as the Basic and Extended CC ROMS. Example • 

• programs are included. Cassette sl<?.?5 » 

• • TERMINAL PROGRAM < DYTERrl > » 

• DYTERH converts a CC into a terminal. Receive and • 

• send data between 2 computers, another terminal or • 

• a MQOBr), BASIC Program with ML subroutines. # 

• DYTERM Cassette S14.9S * 

• • 

• • FINANCE PRO OR AM (DYFIN) • new • 

• DYFIN is designed to aid in the financial planning * 

• of loans, savings, annuties, investments & retire- » 

• ments. It quickly calculates monthly payments fer * 

• loans and gives the return for money invested over • 

• a period of years. Also included is a 300 year • 

• Calender that displays any month of any year plus • 

• a checkbook program. EB is required. Tape S19.93 • 



► HARDWARE I XEMS . 

* Increase your computer's memory with the following » 
» Memory Expansion Kits. Soldering ts not required * 

* and the modifications are reversible. Each kit is • 

► warranted for one year. • 

► ME-1 upgradas AK to 16*, S19.95 • 
t m-2 upgrades 4K to 32K *39.9S « 
» ME-3 upgrades IbK to 32K S3V.9S • 

► ME-4 upgrades 0 & E CC to &4K S99.93 • 
» ME-4F upgrades F series to i>4K SB9.9S » 
» Note: ME-4 & HE-4F require a 1- 1 RDM. WE MILL » 

► install our kits in your Computer far SIO ♦ ship. * 

* 4.B09E Microprocessor Chip *t9.95 « 
» 6821 Peripheral Interface Adapter S6.95 • 
» EXTENDED BASIC ROM S87.00 « 

» WE REPAIR COMPUTER9 » 

» » PUT YOUR PROGRAMS IN A PROM PACK • • 

» Send us your program on a cassette and we will • 
» send you a cartridge with your program in it. Send • 

* *19.95 for 4K and S29.9S for BK. • 
» Blank cartridge with circuit board *9.93 • 

► EPROM type 2764 S9.9S * 

* NEW b USED RS St TDP COLOR COMPUTERS Mere purchased • 

* and upgraded for use in our Computer School. Call • 

* or write for prices. All carry a ISO day warranty. • 

« • checks, VI9A * HC Cards. Add *2 ship. • 

» DYNAMIC ELECTRON I CS I IMC * 

* Box UVib «203> 773-27nB • 
Al_ 
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D/A Converter Operation 

Since the primary use of the PSG is to produce sound lor 
the highly imperfect amplitude detection mechanism of the 
human ear, the D; A conversion is performed i n logarithmic 
steps with a normalized voltage range of from I to I Volt, 
The specific amplitude control of each of the three D/A 
Converters is accomplished by the three sets of 4-bit outputs 
of the Amplitude Control block, while the Mixer outputs 
provide the base signal frequency (Noise and/ or Tone). 

(Reprinted by permission, courtesy General Instru- 
meats/ Microelectronics} 



A /-SAV-A-BYTE A 
^ introduces V 
BATTERY BACK UP 

^^^for 32K/84K CoCo Memory* 

Never again experience 1hal awful fear er worse yet, ihe 
frustrating reaiityof losing minutes or hours of entered 
data/text before it's stored away on tape or disk. SAV-A- 
BYTE give* you the confident assurance that all your data 
that you have so painstakingly entered will be preserved dur 
ing any AC power disturbance. You just resume inputting at 
the same point you were so rudely interrupted when power 

FEATURES: 
•Absolutely no changes to your CoCo 
•Circuitry contained in ROM-port cartridge 
•0N-0FF switch on cartridge, with LED Indicator 
•Over two hours support time during power 
failures 

•External battery connected via cable 
•Battery charging from CoCo power supply 
•Plug-and-Play Installation 
•Optional ribbon cable bus extender 



Ma5t w2±T ViSa ONLY $88. Includes 

call 803 3&8 li^X^S^nS 

or send checks or M0* S to: 

SAV-A-BYTE 



•Dealer inquiries welcome- 
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Blow By Blow Account 
Of An Emerging 
Combat System 

By Bill Nolan 
Rainbow Contributing Editor 




Welcome to the Dragon's Byte. As most of you 
know, this is a column about using your computer 
to aid you in the playing of fantasy role-playing 
games. Every few months 1 repeat the following informa- 
tion, so if you missed it, here's your chance. Fantasy role- 
playing games— such as Dungeons and Dragons, Rune- 
quest. Tunnels and Trolls, or Worlds of Wonder— are not 
computer games. They are also not board games. What they 
are is a separate type of game in which the players each try to 
assume the personality of a made up character and act out 
their part in some sort of adventure. 

Just as the term "fantasy role-playing game" implies, 
participants are playing a role in some sort of fantasy. 
Children (we were all children) play simple versions of these 
games and call them "cops and robbers" or "cowboys and 
Indians. "Theadult versionsarethesamein concept, but arc 
far more complex. The rule books all appear to have been 
written by former legislators, and make about as much sense 
as the tax laws. In this column we strive together to get help 
from our computers as we play our favorite fantasy game. 

The programs here are not games. They are programs 
designed to simplify and speed up some of the more tedious 
parts of playing these very enjoyable games. 

Enough of that. For the last two months, we have been 
workingonacomputerizedcombatsystem. In doing this we 
have examined some ways to make the not very random 
RND unpredictable, and we have looked at the reasons for 
putting a combat system on the computer. We have also 
determined the major things we want the system to do 1 or us. 
I f you missed this column in .1 uly or August, you will want to 
get those issues and read them, because a lot of the back- 
ground for what wc are doing this month was presented 
there. 

Included this month you will find a program. This is not 
the whole combat system quite yet, but the program works 
fine as is. In future columns we will beaddingsomethings to 



(Bill Nolan is a principal in Pric kly-Pear Software, 
DM'sa weekly game of Dungeons & Dragons, and 
leaches Programming In BASIC at a local college.) 



it, but wc will try not to ehange much of this foundation 
program. After all, I don't want people sitting at their key- 
boards cursing me. 

You will sec that the program has five main sections, and 
five choices on the main menu. Contrary to what you may 
believe, this was actually planned, and was not a coinci- 
dence. Line numbers from 0 to 999 are used to set up the 
program. Lines from 1000 to 1999 are used to save and load 
information, those from 2000 to 2999 are for editing charac- 
ter, those from 3000 to 5999 are reserved to handle the 
combat itself, and the lines from 6000 to 6999 are for looking 
at the information about each character. 

In addition to this, we have lines- from 7000 to 7999 which 
we use for subroutines, and lines beginning at 10000 for 
DATA statements. In many cases, as you can sec below, we 
don't need all those line numbers, but starting each section 
on an even program also keeps track of t he current hit points 
of each fighter and tells you when someone is down. When 
one side of a combat is down, it skips over that one in [he- 
future. The program tells you what round you are in, and 
after every round it gives you the option of breaking off the 
combat. 

Lines 3000 to 3050 find out how many combats there will 
be, who is involved in each, what weapon they are using, and 
whether it has any magical plusses. In line 3050, the round 
counter "RC" is .set to I. 

Thecombat loop starts i n line 3060, and the values needed 
to hit are figured in lines 3085 and 3090. This is figured like 
this: (base chance) - ( level - 1 ) - (class bonus) - (weapon plus) 
-(strength bonus) + or - (magical adjustment) +( 10 -oppo- 
nent's armor class) + (opponent's speed bonus) + ((oppo- 
nent's level - 6) + opponent's class adjustment) - ((fighter's 
level - 6) + lighter's class adjustment). Sec, nothing to it! 

Once it ("it" is the computer) knows the numbers needed 
to hit, it either rolls the dice or has you input the results. This 
is done in lines 3120 to 3160. In line 3170. Ihe program 
figures the initiative. This is based on the difference between 
the number needed to hit and the actual roll, so if 1 need a 10. 
but roll a 20, and you need a 4, but roll a 15, then you have 
initiative, because your difference is greater 
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Lines 3200 to 3410 eompute the results of that combat 
round, and line 4000 recycles the whole thing. Keep in mind 
that in doingtheir jobs these line numberscallout to subrou- 
tines from time to time. These subroutines are located in 
lines 7000 to 7500, and 1 will cover each of them in a 
moment. 

Lines iOOO to 6100 simply print out each combatant 
stored in the file one after the other. 

Line 7§0Q gets a single number from the keyboard within 
therangeof 1 to XX. with XX being set in the line that calls 
the routine. It also helps out the random a bit, and then 
returns the number in the variable K, 

Line 7010 just waits for any key to be pressed and then 
returns, as in "PRESS ANY KEY TO CONTINUE." 

Line 7100 gets "Y" for yes or "N" for no from the key- 
board and then returns. 

Line 7200 prints an error message if you try to hold a 
combat and have less than two combatants available. 
Remember, it takes two to make a fight. 

Line 7300 gets the weapon damage multiplier for those 
natural combatants using natural weapons like teeth, claws, 
or tails. Your best bet here is to look at line 100 10, which has 
the weapon data. The number following each weapon is its 
multiplier, so if you know what the natural attack can do as 
compared to some number, it is mueh easier to keep track of 
whereeverything is located. It is more than a little embarass- 
ing to get lost in your own program. 

What we are going to do this month is go through the 
program section hy section, so you can see what is done 
where, That way, if you don't like something, you'll know 
where to go to change it. Fantasy games are very personal, 
and the size of the original rules is exceeded only by the size 
of the changes made by the average group of players. 

The first part is pretty standard. Lines 10 — 17 set up the 
arrays and read some DA T A into them. As you can see, we 
are using several one and two dimension arrays, and one 
array of three dimensions. Line 20 prints the menu of choi- 
ces, line 30 gets your choiee, and line 4# branches to the 
section you have chosen. The block of lines from 1 00 to 270 
asks you to input all of the necessary information about a 
potential combatant. This could be either a character or a 
monster, and wlien you have iuput the information, the 
program returns you t« the menu. Tlie variable CC(Control 
Counter) is used to keep track of how many combatants are 
in the file, and that array- M$ — is dimensioned to hold 31. 
We are keeping track of name, class, combat adjustment, 
level, strength adjustment, speed adjustment, number of 
attacks, base hit points, current hit points, magical adjust- 
ments (not including weapon adjustments, which are han- 
dled elsewhere), and armor class. By the way, the program 
does not trap out multiple uses of the same name. Since the 
searehes are hy name, and since they stop searching as soon 
as they find the target name, you must be careful not to use 
the same name twice. 

The area from 1000 to I 130 is used to save or load data.lt 
iscurrently set upfordisk, and ifyouare usingtape, you will 
have to make some changes. To start with, you will have to 
change every "#l" to be "#-1," because the disk is device I, 
while the tape is device -1. Also, you will haveto change the 
WRITE iu lines 1055 and 1070 to PRINT. After you have 
input all of your characters and monsters, you should save 
them to disk or tape before continuing. Be sure you have a 
disk in the drive or a tape in the recorder with play and 
record pressed before trying to save, or you may lose your 
data, If you ever bomb out of the program, you can usually 



recover your data by immediately typing GOTO 20 and 
ENTER. This should put you back into the menu. 

As we said above, lines 2000 to 2140 are used to change a 
single data item about a character or monster. If you want 
the change to be permanent, you will have to save your file 
again. 

That brinjji; us to line 3000, and a sudden increase in 
complexity. The program will handle nine combats at the 
same time, with two participants in each. The same comba- 
tant can be involved in more than one of these combats. The 
program figures the number needed to hit, the initiative, and 
the damage. It gives you the option of letting it roll the dice 
or having you roll them and enter the values. This is impor- 
tant, as many gamers (myself included) like to roll the dice 
themselves. The weapon, you can easily figure out a suitable 
multiplier. For example, a two-handed sword has a multi- 
plier of 1 .5, so if you think a particular dragon's hiie (byte?) 
is twice as bad as the sword, give it a multiplier of three. If 
you don't like the damage you are getting, change all the 
multipliers. 

Lines 7400 and 74 1 0 roll the combat dice if you select that 
option. 

Line 7500 checks to see if you want to break off the 
combat. Notice that this subroutine calls to the subroutine 
in line 7ff0. 

The subroutine at 7600 is used to run a check when one of 
the combatants is down. Since the combatant may be 
involved in more than one meelee, the program checks to see 
if there are any others involvingthis name. If any are found, 
a "0" is inserted in the array "F" at that number. A "I" in 
array "F" indicates a fight in progress. 

Well, 1 guess that about covers the program on a line by 
line basis. The actual use of the program is pretty simple. 
Once you have typed it in and have all those nasty typos 
corrected. RUN the program. The first thing you will see is 
the menu, and your first selection should he "ADD A 
COMBATANT." You can't use any of the other options 
until you have put at least a couple of combatants into the 
file, so get out a couple of your favorite character sheets and 
type in the information as the program asks for it. 

Once you have your characters and monsters in the file, 
save the file to tape or disk. If you don't do this, you'll be 
sorry. 

Now you can examine your file, edit a particular combat- 
ant, or try out a combat. I think you will find the program to 
be pretty much self-prompting, and wherever possible, 1 
have tried to trap out bad inputs. 

Next month we will be working on some expansions and 
improvements to this program. We will surely add fumble 
and critical hit tables, and 1 have some other ideas 1 think 
you'll like as well. In the meantime, if you have suggestions 
or comments, let me know. If you find any bugs (heaven 
forbid!), immediately swear your most sincere vow of 
secrecy and call me so I ean fix il 




The listing: 

10 CLS: X=RND (-TIMER) : DIMM* {-30, 10 
>,W*U3p l),C*(10),CI*(9,2 f 3) ,F(9 
> »WP(9,2) 
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15 FOR X-0 TO 10: READ C*(X):NEXT 

X 

17 FOR X=l TO 13:READ W*(X,0):RE 
ADW*(X, 1):NEXT X 

20 CLS:PRlNT@46, "MENU" ; : PRINT@10 
2,"1. ADD A COMBATANT"! : PR I NT© 16 
6," 2. SAVE OR LOAD DATA" i : PR I NT© 
230, "3. EDIT A COMBATANT ";: PR I NT 
©294, "4. COMBAT SECT ION ";: PR INT© 
358, "5. EXAMINE COMBATANTS" ;: PR I 
NT@422,"Y0UR CHOICE? <1-5)";:K*= 
INkEY* 

30 XX=5: GOSUB 7000 

40 ON K GOTO 100,1000,2000,3000, 
6000 

1 00 CLS : PR I NT@3 4 , " " ; : I NPUT "COMB A 
TANT'S NAME "I X* 

120 cls:Print:print m i. fighter" 

: PRINT" 2. THIEF": PRINT" 3. CLER 
IC":PRINT" 4. MAGICIAN":PRINT:PR 
INTrPRINT" KEY YOUR CHOICE <1~4) 

" :k*=ink.ey* 

130 xx=4:bosub 7000 

135 M*<CC,0)=X* 

140 ON k GOSUB 150, 160, 170, 180IG 
OTO200 

150 MS (CC, 1 )=" FIGHTER ":M* (CC,2)= 
"6": RETURN 

160 M* (CC, 1>=»THIEF":M* <CC, 2)«"3 



all 
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with 
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" : RETURN 

170 MiMCC, 1)="CLERIC":M*(CC,2)=" 
2"! RETURN 

180 M* (CC, 1>="MAGICIAN":M*(CC,2> 
="0": RETURN 

200 CLS: PRINTG34, C* (3> ;: INPUT M* 
<CC,3> 

210 CLS: PRINT634, C* <4) ;: INPUT M* 

<CC, 4) 

220 cls:print@34,cU(5) ;: INPUT M* 
(CC,S) 

230 CLS: PR INT@34, C* <6> ;: INPUT M* 

<CC,6) 

240 CLS:PRINT@34,C* (7) ; : INPUT M* 

(CC,7) : M* <CC,82=M* <CC,7> 

250 CLS :PRINT@34,C* <«?);: INPUT M* 

<CC,«?> 

260 CLS: PRINT@34, C% ( 10) ; : INPUT M 
*<CC, 10) 

270 CC=CC+i:60T0 20 

1000 cls:print:print m do you wan 
t to save or load? ": pr i nt : pr int " 
press 's' or 'l* . ":k*«inkey* 

1010 J*=INKEY*Sir J«K>"S" AND J* 

<>"l" then 1010 else sound 150,1 
1020 if j*=*"l" then print: print" 
loading will erase current" : pr i 
nt" memory. are you sure (y/n)" 
: k$=inkey$: else boto 1040 
1030 k*=inkey*:gosub 7100: if k*= 

"N" THEN 20 

1040 IF J*«"L" THEN1100 
1050 OPEN " 0" ,#1, "COMBAT" 
1055 WRITE #1,CC 

1060 FOR X=0 TO 20: FOR Y=0 TO 10 

1070 WRITE #1,M*<X,Y) 

1080 NEXT Y,X: CLOSE 1 : GOTO20 

1100 OPEN" I" j, ft 1, "COMBAT" 

1 105 INPUT #1 ,CC 

1110 FOR X=0 TO 20: FOR Y=0 TO 10 
1120 INPUT #1,M*<X,Y) 
1130 NEXTY, X : CLOSE 1 : GOTO 20 
2000 IF CC=fi* THEN GOTO 6100 ELSE 
CLS ; PR INT: PRINT" EDIT WHAT COMB 
ATANT": PRINT" ";: INPUT S* 
2010 FDR X=0 TO CC-l:lF S*=M*(X, 
0) THEN 2100 ELSE NEXT X 
2020 CLS:PRlNT"FILE NOT FOUND" :F 
OR X=l TO 1000:NEXT X:GOTO 20 
2100 CLS: FOR Y=0 TO 10:PRINT STR 
*(Y)5". ";c*<Y);" - ";M*(X,Y):NE 
XT Y 

2110 PRINT: PRINT" INPUT THE NUMBE 
R TO EDI T " : PRINT 

2120 INPUT Z:IF Z<0 OR Z>10 THEN 

2120 ELSE SOUND 150,1 
2130 CLS; PRINT" COMBATANT = " ; M* < 

X,0) 

2140 PRINT :PRINT" YOU ARE CHANGI 
NG" : PR INT" " ; C% ( Z ) : PR INT: PRINT" 



ENTER NEW INFORMATION" : INPUT" "J 
M*<X, Z) :GOTO 20 

3000 CLS: IF CC<2 THEN BOTO 7200 
ELSE PR INT: PR I NT" HOW MANY COMB A 

ts? <i-9) ":k*=inkey«: xx=9:gosub 
7000: nok: for xj=i to 9:f<xj>=0 
: next: for xj=i to nc:f<xj)«i:nex 

T 

3010 FOR X«l TO NC:FOR Y«l TO 2 

3020 cls: pr i nt: pr i nt" combat #" t 
x:print:print" who is combatant 

#" I Y: INPUT" "iX% 

3030 for z«0 to cc~1:if x*=m*<z, 
0) then ci*(x,y,0)=x*:ci<(x,y,3) 
«str«(Z) :else next z:print h name 
not found": for xj-1 to 1000: next 

XJ:BOTO 3020 
3040 CLS: PRINT X*: PR I NT: FOR Z«l 

to 13:print str«(Z)|". M ;w*(Z,0) 
:next z: input" choose weapon <i- 

13)"fWT:lF WT<1 OR WT>13 THEN 30 
40 ELSE CI*(X,Y, 1)=W<(WT,0) :CI*( 
X,Y,2)=W*<WT, 1) : IF WT-13 THEN GO 
SUB 7300 

3045 CLS: PR I NT: PR I NT "ENTER WEAPO 
N'S PLUS TO HIT": INPUT" "?WP<X,Y 
) 

3050 NEXT Y,X:RC=1 

3060 FOR X«l TO NC: CLS! IF F(X)=0 

then next x:8dt0 20 
3070 pr i n t "combat #"?x? m round 

#";rc:print"# i combatant is "5 
ci* <x, 1,0): print"* 2 combatant i 
s ";ci*<x,2,0> 

3080 X1=VAL(CI*<X, 1,3) ) : X2=VAL<C 
I«<X,2,3)> 

3085 H1«22-<VAL<M*(X1,3) )-l)-<VA 
L<M*<Xi,2) >)-WP<X,l)-<VAL<M*<Xl, 
4) ) ) - < VAL (M* ( X 1 , 9) > ) + < 10- (VAL <M* 
<X2,10) ) ) >+<VALCM»<X2,5)) ) + UVAL 
<M*<X2,3) >-&>+<VAL<M* <X2,2) > ) )-< 
<VAL(M*(X1,3) >-&) + < VAL <M*<X 1,2) ) 
)) 

3087 IF Hl<2 THEN Hl«2 ELSE IF H 
1>30 THEN HI -30 

3090 H2=22-(VAL<M* <X2,3) >-l)-<VA 
L(M* (X2,2) > )-WP<X,2)- <VAL<M*<X2, 
4) ) )-<VAL(M«(X2,9)) ) + <10- (VAL (M* 
(XI, 10) ) ) >+<VAL<M*<Xl,5) > )+< (VAL 
<M*(X1,3) >-6) + <VAL<M*(Xl,2) ) ) )-( 
(VAL(M*<X2,3)>-6)+<VAL<M*<X2,2)> 
) ) 

3092 IF H2<2 THEN H2=2 ELSE IF H 
2>30 THEN H2=30 

3100 PRINT" ";CI*(X, 1,0) ; " NEEDS 

";hi;"TO hit- 

3110 PRINT" ";CI*(X,2,0); " NEEDS 

";H2;"T0 hit" 

3120 PRINT" WANT ME TO ROLL THE 

dice?":k*=inkey»:gosub 7100: if k 



** M Y" THEN 7400 

3130 PRINT" ";CI*(X, 1,0) J"'S ROL 
L" I : INPUT Rl 

3140 PRINT" ";CI«<X f 2,0)i H, S ROL 
L"; : INPUT R2 

3145 Rl«Rl+l:R2«R2+l: IF (Rl-Hl )* 
<0 AND <R2-H2)«<0 THEN PRINT" NE 
ITHER HIT":QOTO 4000 
3150 IF ( R 1 -H 1 ) >0 THEN PRINT " " 

ici*<x, 1,0);" hit. ":di=int( (Ri- 

Hl)*VAL(CI*(X f 1,2))) 

3160 IF (R2-H2)>0 THEN PRINT " " 

|CI*<X,2,0) J " HIT, ":D2«INT< (R2- 

H2)*VAL<CI*(X,2,2>) ) 

3170 IF<R1-H1)XR2-H2) THEN 1 = 1 

ELSE IF (R1-H1X (R2-H2) THEN I«2 

ELSE I«3 
3180 ON I GOTO 3200,3300,3400 
3200 PRINT" "fCIfCX, 1,0) S" HAS I 

nitiative h :print" »jci*<x, i f «)i" 

*S DAMAGE IS"|Dl:XJ«VAL(M*(VAL(C 
I«<X,2,3)>,8) ) :XJ«XJ-D1:M*(VAL(C 
I*<X t 2,3)>,8)«STR*(XJ):IF XJ«<0 
THEN PRINT" "CI * ( X , 2 , 0) J" IS DOW 
N":F(X)=0: JJ*=CI*(X,2,0) IGOSUB 7 
600: GOTO 4000 

3210 IF(R2-H2)>0 THEN PRINT" " ; C 
I*<X f 2,0); M, S DAMAGE IS";D2:XJ«V 
AL(M«<VAL<CI* (X, 1,3) ) ,8) ) : XJ=X J- 



j&l ADVANCED MATH PROGRAMS 
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FUNCT1IN GRAPHING MODULE 16K EXT-S19.95 
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* COMPOSITE AREAS 

* HANDLES PIECEWISE CONTINUOUS FUNCTIONS 
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CHECK OR MONEY ORDER — $1.00 for 
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D2:M«<VAL<CI«<X, 1,3) >,G)-STR»<XJ 
):IF XJ-<0 THEN PRINT " "|CI«<X, 

1,0);" is down": F<x)-0: jj»-ci»(X 

, 1,0):QOSUB 7400: GOTO 4000 
3220 GOTO 4000 

3300 PRINT" "|CI*(X,2 P 0) I " HAS I 
NITIATIVE":PRINT" "iCI«<X,2, 0) I " 
*S DAMAGE IS";D2:XJ-VAL(M*CVAL(C 

i*(x, 1,3) ) ,B> ) :xj-xj-D2:m*<val<c 

I*(X,1,3)),Q)«STR*<XJ):IF XJ-<0 
THEN PRINT" "CI«(X f 1,0) f " IS DOW 

N":f<x)»0: jj*»ci«(x, i,0):gosub 7 

600: GOTO 4000 

3310 IF(R1-H1)>0 THEN PRINT" " I C 
X*(X, l f 0)l"»S DAMAGE IS"JD1:XJ=V 
AL (M* < VAL (CI* ( X . 2, 3) > , B> > : X J-X J- 
Dl:M»(VAL(CI*(X,2,3)> ,G)»STR*(XJ 
):IF XJ»<0 THEN PRINT " "1CI*(X, 

2,0);" is down":f<x)-0: jj*»ci*<x 

, 2,0):8OSUB 7600: GOTO 4000 
3320 GOTO 4000 

3400 print" simultaneous in it i at 
ive m :print" "<ci*(x, 1,0) ; '"s dam 
age is"1d1:xj-val<m»(val<ci»(x,2 
, 3) > , 8) ) : x j=x j-d l : m* <val (c I* < x , 2 

,3)),G)»STR*(XJ) : IF XJ=<0 THEN P 
RINT" "CI*(X, 2,0) | "IS DOWN":F(X) 
-0: JJ«=CI»<X,2,0):GOSUB 7600 



3410 IF(R2~H2)>0 THEN PRINT" " I C 
I*(X, 2,0)1 "*S DAMAGE IS"|D2:XJ-V 
AL(M*(VAL(CI*(X, 1,3) > ,B) ) : XJ-XJ- 
D2: MX VAL (CI* (X, 1,3) ) ,B)=STR*(XJ 
)!IF XJ-<0 THEN PRINT ■ "JCI*(X, 

1,0)1" is down m :F(X)=0: jj*-ci*(x 

, 1,0):GOSUB 7600: GOTO 4000 
4000 PRINT" PRESS ANY KEY":GOSUB 
7010: next x:rc^roi: XB=0:FOR X9 
-I TO 5:XG»XG+F<X9):NEXT X9IIF X 
G-<0 THEN 20 ELSE GOSUB 7500: IF 
K*»"N" THEN 20 ELSE 3060 
6000 IF CO0 THEN 6100 ELSE FOR 
X-0 TO cc-i:cls 

6010 FOR Y*0 TO 10:PRINTC*<Y); " 

- "Im*(x,y):next y:print:print"P 
ress any key":k*»inkey»:gosub 70 

10: NEXT X:GOTO20 

6100 CLS:PRINT"FILE EMPTY": FOR X 

=1 to 1000: next: goto 20 

7000 k»=inkey*:k»val<k«) : if k<i 

or k>xx then x=rnd (0) : goto 7000! 

else sound 130,1: return 

7010 if inkey*-"" then 7010 else 

SOUND 150, l: RETURN 
7100 K*=INKEY*:IF K*<>"Y" AND K* 
<>"N" THEN 7100 ELSE SOUND 150,1 
! RETURN 

7200 PR I NT "YOU MUST HAVE AT LEAS 
T TWO COMBATANTS IN THE FIL 

E TO HAVE A COMBAT": FOR X=l TO 
1000: NEXT: GOTO 20 

7300 CLS: PR I NT: PR I NT" NATURAL WE 
APON. INPUT WEAPON DAMAGE MUL 
TIPLIER. ■: INPUT" "|CI»(X,Y,2) :RE 
TURN 

7400 R1=RND(30) : PRINT" ";CI»(X,1 
,0)f'"S R0LL"|R1 

7410 r2»rnd(30): print" "|ci«(x,2 
,0)j"'s roll" i r2: g0t03145 
7500 cls:print:print" another co 
mbat round? (y/n) " : k*=inkey»: gos 
ub 7100: return 

7600 FOR Jl=l TO 9: IF CI*(J1,J2, 
0)=JJ* OR CI*<J1,2,0)=JJ* THEN F 
(J1)=0 

7610 NEXT J i: RETURN 
10000 DATA NAME, CLASS, COMBAT ADJ 
USTMENT, LEVEL, STRENGTH ADJUSTMEN 
T, SPEED ADJUSTMENT, NUMBER OF ATT 
ACKS, NUMBER OF HIT POINTS, CURREN 
T HIT POINTS, PLUS OR MINUS FOR M 
AG I C, ARMOR CLASS 

10010 DATA SHORT SWORD, 1, LONG SW 
ORD, 1.2, TWO-HANDED SWORD , 1 .5, PAG 
GAR, .5, MACE, 1, LONG BOW, 1 , CROSSBO 
W, 1.2, AXE, 1, SPEAR, .7, SLING, .5, HA 
ND AXE, .6, FLAIL, .9, NATURAL WEAPO 
N,0 t 



TRS-BO COLOR BASIC 

bv BOB ALBRECHT 
This entertaining self -instructions I book is packed with 
games, experiments, scores of Intriguing challenges, end 
activities related to fantasy role-pleylng games. The 
fcfeel introductory aid for kids, parents end teachers 
using the Color Computer. 

John Wiley A Sons $9-95 
605 Third Ave., New York, NY 10158 

TRS-80 COLOR COMPUTER GRAPHICS,. 

by DON INMAN 

Explore the creative end imaginative blending of a 
and color. This exciting book will enable you to explore 
ell the graphics capabilities of Extended Color BASIC. 
Reston Publishing Company $1 4.96 

1 1 480 Sunset Hills Bd„ Reston, VA 22060 



ASSEMBLY LANGUAGE GRAPHICS 

FOR THE TRS-BO COLOR COMPUTER 
by DON INMAN and KURT INMAN 
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ajiplleatwns using sound and graphics to illustrate how en 
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Reston Publishing Company $14.95 
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198 the RAINBOW September 1963 



Software ReviewZ 

Talking Speller 'Works' — 
But Is It Worth Using? 

Superior Graphic Software's Talking Speller is a drill 
program using voice playback through the television moni- 
tor to preview a set of spelling words, dictate theru to a 
student, prompt corrections and compute the student's test 
score. It requires 16K of memory, but Extended Color 
BASIC is not required. When loaded f rom cassette, the menu 
shows two program options. 

Program Option I allows the teacher to create a spelling 
drill by typing in selected words, then dictating them into the 
cassette recorder. The program prompts the dictation by 
flashing the words on the screen, oneat a time, Chen turning 
the cassette motor on and off, aUowingapproximately seven 
seconds for each word to be spoken (and recorded) twice. 
There is no limit to the number of words that can be entered 
in the drill, and the teacher can prepare and file on cassette a 
number of different spelling lists. 

Program Option 2 tests the student, who is first asked if 
he/she wants to preview the list. If the answer is "yes," the 
words are spelled, one letter at a time, accompanied by tones 
from the speaker. Then the test begins: The program turns 
on the cassette motor, plays the dictated words through the 
monitor speaker, pausing after each word to wait for the 
student's answer. If the word is spelled correctly any of three 
times, the program plays a fanfare and prints praise on the 
screen. If the student misses once or twice, the program 
supplies hints in the form of blank spaces on the screen 



showing which, if any, letters the student has correct. After 
the third unsuccessful try, the program fills the screen with 
the word, correctly spelled, then moves to the next word on 
the list. At the conclusion of Option 2, the student's score is 
computed, including the number of words spelled correctly 
on the first, second and third try. 

Talking Speller does everything its designers claim for it. 
It trees a teacher f rom dictating spelling lists to the class and 
allows for a highly individualized approach to spelling 
dictation. 

However, like so many other language arts software pro- 
grams on the market, this one devotes the power and appeal 
of computers to a task that is not only fairly trivial, but 
pedagogically obsolete. A solid body of language arts 
research suggests that spelling words are not learned best 
through drill or dictation. Spelling lists are too far removed 
f rom everyday uses of writing, and students therefore do not 
retain the words for long after the drill. Spelling words are 
more easily mastered in the process of proofreading a paper 
containing one's own choice of language. In this respect, 
having students write papers on computer word processing 
programs with spelling ebeekers to guide them in finding 
errors will prove a superior method of helping students learn 
to spell. 

For a teacher who still drills students through spelling 
lists, Talking Speller might be a useful addition to the class- 
room software library. But computers in the classroom ean 
be put to much better uses. 

(Superior Graphic Software Products, Box 451, Can- 
ton, NC 28716, $19,95 *n cassette) 

— Stephen N.Tchudi 




it of your new Dragon microcomputer from Dragon-Tano, you need Dragon User 
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Each issue of Dragon User contains: 
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• programming articles for users 
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for 12 issues airspeeded to you - or take advantage of 
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Software p ""' — """^ 

Mathfact — Educational 
But Not Exceptional 

Mmhfact by B5 Software Company has some educational 
value, but does not utilize the capabilities and power of the 
CoCo, As an educator, I maintain that the most important 
aspeet of a program is the ability to convey an idea in a 
different manner than could be presented in a textbook. 
Mathfmct falls short on this point. 

Program loading is error free and is configured for a I6K 
CoCo Extended BASIC. The program is drill and practice in 
the area of math facts (addition, subtraction, multiplication, 
division). Two difficulty levels are available for all the fact 
areas. The first screen is the menu. The user is asked to select 
the difficulty level and the targeted practice area. It is 
assumed that the user is old enough to read the menu to 
choose the proper options. This program must be used with 
adult supervision for proper implementation as a useful 
learning tool. The drills are timed and score and time are 
given at the end of the lesson. 

I.evelone constitutes a good teaching practice of using the 
concrete before the abstract is taught. The problems are 
presented in graphic form as shown in the example. 



5 2 7 

This provides the concrete practice before the user moves to 
the more complex levels. This method is standard for the 
four fact areas. 

Level two allows the user to select a number from one to 
nine. This is the fact that will be practiced Problems are 
presented one at a time and are in page format. If the student 
misses the problem, the program branches back to the con- 
crete level to allow the user additional practice. The user 
must correctly answer the problem before continuing in 
level two. The instructor cannot change the number of prob- 
lems and there is no consideration for too many incorrect 
responses in the first level, The user could answer wrong all 
day. 

If users eorrectly answer all questions, they are given the 
choice to select a game. The game is a number guessing 
game. The computer picks a number between two limits and 
the user must guess the number, Hints are given (too high or 
too low). The user is given only four chances to guess the 
number. For young children, this is totally inadequate. A 
child's reasoning abilities are not sufficiently developed to 
guess the number in four tries. The suggested grade levels are 
up to grade five. A fifth grader would have a tough time 
guessing in four attempts. 

After the game is completed, the program branches back 
to the same drill that was previously selected or a new option 
may be entered. The program has some major educational 
flaws that could be corrected to make this a very desirable 
program for use in the classroom or home, 



Report Card 

Educational Value = C 

Comment— Drill and practice programs are best left for 
the textbook and worksheet. Not challenging or motivating 
beyond the normal classroom situation. 

Appropriateness = C 

Comment — Again, it is appropriate for drill and practice 
programs to be used, but leave them on paperunless presen- 
tation is unique, 

Objectives Met = A 

Comment— The program meets all the objectives spelled 
out in the documentation for all areas contained in the 
program. 

Error Handling = B 

Comment— Errors are handled satisfactorily in level two. 
In level one, there is no limit to the amount of incorrect 
responses. Also, in level one, the user can type in letters or 
numbers for an answer. If more than a few numbers are 
entered, the program crashes. Students fooling around 
could easily bomb the program. The BREAK key is not 
disabled which can cause problems with smaller children. 

Final Grade = B- 

Enhancement 

The instructor should be able to change the number of 
problems presented and select the timing option. More gra- 
phics and sound would be a nice addition. Limits should be 
set for incorrect responses. When the limit is reached, the 
answer should be given. The number of guesses in the game 
should be increased and the reward for getting the correct 
answer should be varied and motivating. Good possibilities 
for an excellent program. 

(BS Software, 1024 Bain b rid R e PI., Columbus, OH 43328, 
S16.95 od tape) 

-Rick CobcUo 
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Software Review. 



Genealogizers Might Say 
Family Is Great, Great, Grand. . . 



Family is a genealogical data base program for a 32K 
ECB CoCo with a Line Printer VII. The program uses just 
about all of CoCo's memory in order to hold data for eight 
generations. This program has no fancy bells and whistles, 
but it appears it would be useful for anyone interested in 
their family tree. The program will allow you to enter the 
following information about your family's roots: name, date 
of birth, place of birth, date of marriage, place of marriage, 
number of children, date of death, place of death, buried at. 
and occupation. The entries for children and marriage are 
filed for the husband only to save memory. 

The program is menu driven and was easy to use once 1 
figured out the reference number system used to identify 
each person in the family tree. In addition to creating a file, 
you can correct previously entered data rather easily by 
entering the reference number of the file you want to edit 
and then follow the on-screen prompts. 

The program requires so much memory it cannot be used 
with a disk system but the program is written in BASIC so I 



suppose it could be modified to be compatible with a disk. 
This, of course, would reduce the number of generations you 
could enter. In order to list the information to the printer, 
you must first save the data to tape and then load a second 
program which will then read your data tape and give you 
three options for printouts. 

Option number one is a pedigree chart. This option will 
print a chart of any fivegenerations in yourfile.l found this 
to be an interesting chart, but could only find information 
f or f our generations of my f amily. so I didn't get f ull use of 
the chart. Option number two is a family group chart that 
prints all available information on a family group(husband 
and wife), 1 didn't find thi$ chart as useful as the pedigree 
chart, but maybe if 1 knew rrtore about genealogy 1 could 
have found a use for it. The last print option is a reference 
index. This printout will list all the names you have on file 
and their corresponding reference number. The reference 
numbers are needed if you want to edit a particular file. 

The three pages of documentation are well written and 
will have you using the program in a matter of minutes, If 
you arc into "family trees" then 1 think this program could 
be useful. 

{TWM, P.O. Box 232, Ufa, PA 17543, 32K ECB, S9.95) 

-Michael Hunt 



U 



Fun For The Whole Family" 



Tlredo* 



mm or two plajmr gome* the tare boring tor or* rgwm b nt the player? Do yea wf«h yea 
tat tho children lotereetrd Id a ganaa that hot a^qcad^^qu«Utl«a »«I la entertaining 



i to keep them IntcmeindT Than yon oood ALPHABET SOUP, a wort recognition and 
„„„.* game that haa oil the cheUeago and excitement of an area** game sloe the ton and 
competition of a board game. With room for op to Ave ptoyera and nine eklll level* , ALPHABET 
SOUP la great lamlly fan. It*e bo mash Ian, the children went even notice that their word 
recognition, apeUtag, vocabulary, and typing abllla are etaadlly Improving. 
ALPHABET SOUP $14.9$ 

WITH SCHOOL ABOUT TO BEGIN, TTO TMB TO HELP YOVH CHILDREN SHARPEN THEIR MATH 
A KILLS) With ear three math drill pregreme, year children can practice me th ahlUa that bare 
grown maty over the eommer vacation and be ready to atnrt teaming ncwnmrnrml Immediately 
after mhool begins. Each program feature ■ H-re chill larels, entertaining made and graphic* 
and pereoneUmd prompt* to keep the children Interacted and motivated. 

COLOR MATH QUIZ $1445 

FRACTION MATH QUIZ $14.95 

DECIMAL MATH QUIZ $14.95 

For more information about ear line of pregrame, hardware, and hardware kite for the Color 



^:^o"^Vo\VE°MV? E *ffi L E °x\sgis T » E * B 8 . o c" TDPI ~ wrrH A 

SEND CHECK, MONEY ORDER 

OR URCHA8E ORDER TO? CREATIVE TECHNICAL CONSULTANTS 

P.O. Box 052 Cedar Croat, NM 07008 
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GRAPHICS 



32K " 

ECB 




Draw Something 
Exotic, l/l/ith 
^itex93 



By Edi/vard Krikorian 



Fliex93 is a program which allows the average Color 
Computer user to create complex images on the 32K 
BASIC color computer's high resolution graphics 
screens. The program is completely menu driven All the 
user must do is load it and type RUN. It is best to clear the 
screensfirst. On the first running when the user requests that 
all screens be cleared, the program will sometimes halt, To 
correct this problem, simply type thecommand RU N again. 
Atany time a graphic picture is shown, theusercan return to 
the main menu by pressing the space bar. 

The program will draw N-sided objects. The more sides an 
object has, the more that object resembles a circle. The first 
object or subgroup should be drawn in the "new object" 
mode. Once this object is completed a new subgroup ean be 
drawn and connected to the one before by using the "con- 
nect to previous object". option. You can connect objects 
only if they contain the same number of sides. Whether the 
object is at a different angle or not, is unimportant, they will 
still connect. It is up to the user to determine whether the 
object will fit on the screen. If the object is too large, the 
program will halt and report an ?FC Error. Once an image 
has been drawn, the user ean press the Break key and call up 
a screen dump routine and print the object on a dot matrix 
printer. Images a re not in color, though they produce excel- 
lent pictures. 

The center of the screen (point 1 28,96), is considered the 
point (0,0) by this program. When the user specifies a point, 
he should keep this in mind. By the way, the point you 
specify represents the center of the object not the sides. A 
subgroup is counted each time the user executes the new 



(Ed Krikorian is a third year student #/ computer 
science and holds an A. A. degree from the University 
of Florida J 



object orconnects to previous object options. Fordetermin- 
ing angles the best analogy to use is the planet Earth. The 
equator circle would be a horizontal angle of 0 degrees. A 
circle drawn from the North Pole to the South Pole would 
be a horizontal angle of 90 degrees. For vertical angles think 




of a cube on a flat table with one side facing you. This 
represents a vertical angle of 45 degrees. If you turn the cube 
so thata corner now faces you, you have changed itsvertical 
angle to 0 degree. If you have trouble visualizing these 
examples, study the sample pictures or try some random 
input values. 

When the "movable objects" m«de has been selected the 
computer will ask for the number of subgroups. It will then 
prompt you for the pictures data in the usual manner. The 
only difference being that once all the subgroups areentered 
the computer will memorize all the moves and draw the 
object at different horizontal or vertiea! angles the number 
of times the user specifies. Eaeh time it will draw your object 
with the incremented angles. This gives the user a new 
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perspective on what he or she has drawn. As the computer 
draws, in the movable object mode, it uses the graphic screen 
that the user is not currently looking at. Once the object has 
been completed, i t will display the other graphic screen and 
draw on the one you were just viewing. The more subgroups 
an object contains, the longer it takes the computer to draw 
them. Have fun and may you draw something exotic, 



The listing: 



10 REM ***VITEX93* 
20 REM ##*BY ED KRIKORI AN*** 
30 REM ***VERSION 3. 0******* 
40 REM ***DECEMBER 27, 1982** 
50 PCLEAR 8 
60 PI-3, 1415926 

70 DIM H<200, 1>,AH<200, 1>,L<50,6 
) 

80 CX»128:CY-96 
90 CLS 

1 00 CLS : PR I NT " ME NU " : PR I NT " 0 . NE W 
OBJECT. ": PR INT" 1. CONNECT TO PREV 
IOUS OBJECT. ": PR I NT "2. CLEAR SCRE 
ENS. ":PRINT"3.VIEW SCREENS. ":PRI 




COMPUTERS UNLIMITED 

[803) 877-0269 
DATASOFT Fa P e Disk 



Moon Shuttle (16K) ...... $27.95 $27.95 

TOW MIX 

Donkey King (32K) $19.95 $24.95 

Space Shuttle (32K) $24.95 

Trap Fall (16K) $24.95 $26.95 

INTHACQ LQB COMMUNICATIONS 

Colorpede (16K) $26.95 $29.95 

Robottack (16K) $19.95 $24.95 



S**,i*t* ZAXXON (32KI - $29.95 
AMDISK III ■ M99.95 



cidata 

We also handle all othei Okldata products! 
C.ITOH Prowriter (Parallel) $385.95 

ACCESSORIES 



Super-Pro Keyboard Kit 562,95 

We also carry TRS-80 Color Computers. 

This is just a partial list — call or write tor catalog!! 

TERMS: Money order and your personal checks welcome 
Shipping - $2,00 for software, 2% for hardware. 

CCD. please add $2.00- S.C residents add 4% sales tax. 

COMPUTERS UNLIMITED -rt. 7 JOHNSON ROAD 

8BEEB, S.C. 29651 • (803) 877-0269 9a,m.to9p.m. EST, 



NT"4. HALT EXECUTI ON. " : PRINT"5. MO 
VABLE OBJECTS. ": INPUT" YOUR CHOIC 
E";D 

110 IF D=5 THEN 770 

120 IF D»4 THEN PRI NT "EXECUTI ON 

HALTED. " : END 

130 IF D>5 OR D<0 THEN PRINT "IN 
VALID COMMAND": GOTO 100 
140 PRINT 

150 IF D=3 THEN 610 

160 IF D=2 THEN INPUT"WHICH SCRE 

EN (1,2 OR 3-BOTH>"SSW 

170 IF SW-1 THEN SW-0:PMODE 4,1: 

PCLS:QOTO 100 

180 IF SW=2 THEN SW«0:PMODE 4,5: 
PCLS:GOTO 100 

190 IF SW=3 THEN SW=0:PMODE 4,1: 
PCLS:PMODE 4,5: PCLS: GOTO 100 
200 PRINT" DEGREES FROM HORIZONTA 
L, ": INPUT "HIT <ENTER> FOR LAST V 
ALUE"JTS:IF TS-0 THEN TR-TX ELSE 

TR-TS 
210 TX-TR:PRINT 
220 TR-PI/ (180/TR) 

230 pri nt "degrees from vertical, 
": input "hit < enter > for last val 
ue";tw:if tw»« then ty«tu: print: 
goto 250 else ty=pi/ < 180/tw) 
240 tu=ty: print 

250 PR I NT" OBJECT'S LOCATION OFFS 
ET (X,Y)": INPUT" FROM CENTER OF S 
CREEN"? XO,YO 
260 PRINT 

270 INPUT "OBJECT'S RADIUS";R 
280 PRINT 

290 INPUT "NUMBER OF SIDES"; J J: J J 

=PI/JJ*2 

300 PRINT 

310 PRINT"IF SAME OBJECT WITH DI 
FFERENT": PRI NT" ANGLE FROM HORIZO 
NTAL IS WANTED": PRI NT "ON SCREEN 
2, ENTER ITS DEGREES, » : INPUT"OTH 
ERWISE HIT <ENTER>";AT 
320 PRINT 

330 IF AT>0 THEN PRINT: PRINT" SEC 
OND OBJECT'S DEGREES" : I NPUT" FROM 
VERTICAL" J TE: SF=1 : AT-PI / C 1 B0/AT 

):pa=i:if te=0 then goto 370 els 

E TE-PI/ (180/TE) :GOTO 370 

340 INPUT"WHICH SCREEN (1 OR 2)" 

J PA 

350 IF PA=0 THEN PA=1 
360 IF PA=2 THEN PA=5 
370 PMODE 4, PA: SCREEN 1,0 
380 POKE 65495 , 0: * ***DELETE THIS 
LINE IF YOUR SYSTEM DOES NOT HA 
VE HIGH SPEED POKE************** 
390 REM ***DRAWING ROUTINE**** 
400 NC=0 

410 FOR CN=(0+TY) TO <<2*PI)+TY> 
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STEP J J 
420 Y=INT(R*SIN(CN> > 
430 X=INT(CX+(R*COS(CN) )+SIN(TR) 
+X0> 

440 Y«CY-( <Y*SIN(TR) >+Y0> 
450 PSET(X,Y,1> 

460 IF CNO0+TY THEN LINE(X,Y>-( 

OX,OY>,PSET ELSE LX=X:LY-Y 

470 IF D=0 THEN 500 

480 IF SF=0 THEN LINE (H(NC, 0) , H ( 

NC, 1>>-<X,Y>,PSET 

490 IF SF-1 THEN LINE (AH(NC,0) , A 

H(NC,1>>-(X,Y>,PSET 

500 IF SF=0 THEN H ( NC,0> =X : H(NC, 

1>-Y 

510 IF SF-1 THEN AH( NC,0>=X: AH (N 

C, 1 > -Y 

520 NONC+l 

530 OX-X:OY«=Y 

540 NEXT CN 

550 LINE(X,Y>-(LX,LY> , PSET 
560 POKE 65494, 126: * ***DELETE TH 
IS LINE IF YOUR SYSTEM DOES NOT 
HAVE HIGH SPEED POKE*»»********* 
570 IF SF=1 THEN PA=5: SF=0: TR-AT 

:ty»te:boto 370 

580 if qw=1 then return 

590 IF INKEY*=" " THEN GOTO 100 
600 GOTO 590 

610 INPUT" VIEW SCREEN (1,2 OR 3- 
BOTH) " | H J 

620 IF HJ=0 THEN HJ=1 

630 IF HJ=2 THEN HJ=5 

640 IF HJ=3 THEN 680 

650 PMODE 4, HJ: SCREEN 1,0 

660 IF INKEY*<>" " THEN £60 

670 GOTO 100 

680 PMODE 4,1: SCREEN 1,0 

690 FOR HH=1 TO 250 

700 IF INKEY*=" " THEN 100 

710 NEXT HH 

720 PMODE 4,5: SCREEN 1,0 

730 FOR HH-1 TO 250 

740 IF INKEY*-" " THEN 100 

750 NEXT HH 

760 GOTO 680 

770 '***MOVABLE OBJECT ROUTINE** 
780 INPUT-NUMBER OF SUBGROUPS " ; N 
L 

790 PRINT 

800 IF NL>50 THEN PR INT" TOO MANY 

SUBGROUPS": GOTO 780 
810 PM0DE4, i:pcls:pa»i:qw=i 
820 FOR KE-1 TO NL 
830 PR I NT" SUBGROUP #"*KE?" OF "; 
NL 

840 PRINT"MENU":PRINT"0.NEW OBJE 
CT." : PRINT" 1. CONNECT TO PREVIOUS 
OBJECT. ": INPUT" YOUR CHOICE" ?L(K 
E,4> 



850 PRINT 

860 PRINT"OBJECTS OFFSET (X,Y)«S 
INPUT"FROM CENTER OF SCREEN" JL (K 
E,0) ,L(KE ( 1) 
870 PRINT 

880 INPUT"RADIUS OF OBJECT " J L (KE 
.2) 

890 PRINT 

900 INPUT"NUMBER OF SIDES" I L (KE, 
3> :L(KE,3>»PI/L(KE,3>#2 
910 PRINT 

920 INPUT" DEGREES FROM HORIZONTA 
L"?TR: TR=PI/ (180/TR) :L(KE,5> »TR 
930 PRINT 

940 INPUT" DEGREES FROM VERTICAL" 
?TU:IF TU-0 THEN TY-0 :L (KE , 6> -0: 
PRINT: GOTO 950 ELSE TY-PI / ( 1 80/T 
U> :L(KE,6>»TY 

950 D»L (KE,4>: JJ»L(KE,3> :R=L(KE, 
2) :XO=L(KE,0> : YO=L(KE,l> 
960 GOSUB 370 

970 A*-INKEY*:IF A*<>" "THEN 970 
980 NEXT KE 

990 INPUT"NUMBER OF MOVEMENTS" \ N 
T 

1000 I NPUT"DEQREES OF HORIZONTAL 

MOVEMENT" | DR 
1010 INPUT"DEGREES OF VERTICAL M 
OVEMENT " I VR 
1020 TR-0 

1030 IF DR-0 THEN 1040 ELSE DR=P 
1/ (180/DR) 
1040 QW»l:PA*5 

1050 PCLS: PMODE 4, l:PCLS: SCREEN 
1,0 

1060 FOR BB-1 TO NT 

1070 TZ-TZ+DR:VZ=VZ+VR: SCREEN 1, 

0:IF PA=1 THEN PA-5 ELSE PA=1 

1080 PMODE 4, PA: PCLS 

1090 FOR SS-1 TO NL 

1100 D»L(SS,4) : XO»L(SS,0>: YO-L(S 

S, 1 >:R»L(SS,2> : JJ-L(SS,3> :TR=L(S 

S , 5> +T Z : TY-L ( SS , 6 > +VZ 

1110 PMODE 4, PA: GOSUB 380 

1120 NEXT SS 

1130 NEXT BB 

1140 SCREEN 1,0 

1150 A*=INKEY*:IF A*=" " THEN 90 
ELSE GOTO 1150 



Hint . . . 

No-List POKE 



If you would like to keep your program from listing, use 
POKE 383,158. To return t* normal listing, type POKE 
383,1, 

—Ken Ostrtr 
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COCOPRO 



COCOSLOTS 

"as well done computerized one-ar»ed bandit as I can 

imagine* OftN 1983 RAINBOW REVIEW 

ONLY $12,33 

REVERSI 

OTHELLO "this is a very good show froi 

COCOPRO" DEC 19B2 RSINEOi' REVIEW 

CHEAP - $12.30 

FULL SCREEN EDITOR 

Use arrow-keys control for editing of fcssic prograis. 
Much iuch wore. 

BARGAIN 115,86 

COLOR DIRECTORY 

This is the OIR couand that you wish you had. 
Sorted OIR list with selection. Optional display to 
printer. 

ft SJST 112.10 

EXPANDED DIRECTORY 

Save up to 128 files on one diskette. 

BODD BUY - - 112.80 

CASSETTE DIRECTORY 

List proqran na*e, length,, start, end and transfer 
address. Frie with all orders if requested or send 
$2,5f for progrifl on cassette. 



Above pragraos written in Bachine language for Ihh, 
COCOSLOTS, SEVERS1, CASSETTE DIRECTOR? and FULL SCREEN 
EDITOR do not require EXTENDED BASIC!!! But are 
cravat isle with EXTENDED or DISK BASIC. 



MASTER DIRECTORY 

1 Waster listing ay diskette nuiber with description. 
1 Master listing of all your prograis in either 
diskette or prograa sequence, 
t Basic for easy costoeizing,: fast sach Ung sort 
I Requires 32k with printer 

BEST SELLER — %2iM 

*** FREE CATALOG *** 

Send self addressed staiped envelope. 



Send check or soney-order to; 
COCOPRO 
P.O. BO* 37022 
5! LOUIS, HO 63141 



Postage paid on pre-paid orders in continental U.S.. 
KB residents add 5,625% sales tas. 



Software Revlewm 



Hidden BASIC 
Is Pirates' Peeve 

"Piracy" is much more common today than in the 16th 
century when the term originated. Whetheri t is an otherwise 
honest computer hobbyist sharing a good game with a 
friend, or a very dishonest dealer stocking his shelves with 
illegal copies, sof twaic piracy is a recognized industry-wide 
problem. The number of "doubloons" lost through illegal 
copying is enough to discourage many from entering the 
software market. This has forced software distributors into 
building copy protection into their products, There are cod- 
ing techniques which offer a measure of protection for pro- 
grams written i n machine code, but there has been little copy 
protection available for programs written in Color Compu- 
ter BASIC, The reason for this is simple. The philosophy 
behind the design of the BASIC operating system used in 
CoCo is that of simplicity, simplicity tothe point of allowing 
accessibility to even a young child, In doing so, much flexi- 
bility with respeet to copy protection is compromised. 

Hidden BASIC 1.9 is a new tool marketed by Spectrum 
Projects which can help to protect a BASIC program from 
being copied. This is a machine language program that is 
appended to a BASIC program that you would like to pro- 
tect. The resulting composite program, which is loaded as a 
machine language program, disables several commands 
normally found in BASIC. These are commands such as 
LIST, LUST, CSAVE, CSAVEM, EDIT, CLOAD, 
CLOADM, and TRONand TROFF, which presumably 
eould allow either direct duplication or listings of BASIC 
code which could be entered manually. 

Hidden BASIC is very easy to use. It is loaded, the program 
to be protected is loaded, then the new program is saved 
automatically to tape. When loading, the protected program 
is treated as a machine language program, ie, CLOADM, 
but it is R UN not EXECuted. The protection provided for 
with this program is very effective. 

Not mentioned in the advertising or the instructions, is 
that this program also appears to protect against copying 
with Disk BASIC. The SA VE, SA VEM, LOAD and 
LOAD.M commands do not work, therefore, a program 
cannot be taken apart by the add power allowed with the 
disk operating system. It is important to note that this 
program is sold only in a format designed to operate with 
cassette storage. 

1 recommend Hidden basic to anyone who has reason to 
protect a basic program. It is straightforward, easy to use, 
and works as advertised. There is the small matter of a 
royalty agreement with Spectrum Projects if you market a 
program using Hidden BASIC for protection, I called Spec- 
trum to obtain details relating to royalty agreements »n their 
"voice line," but only talked to a friendly tape recorder 
waiting to take my order. If you have any questions you 
should perhaps write or contact them via the data communi- 
cations number given on the instruction sheet 

(Spectrum Projects, 93-15 86th Drive, Woodhaven, NY 
11421, $19.95 on cassette for BASIC or Extended Color 

BASIC) 



Software Review! 



Spell-Rite Makes 
Cassette Spelling Right 



As an adjunct to a cassette-based word processing system, 
Spell- Rite has so much promise that it could take upallyour 
time for a month and still have untapped applications. Yet 
using Spell-Rite can be so frustrating that you II want to 
chuck it out of the window after two hours. 

The program, written by Darrel Wright and marketed by 
Eigen Systems of Austin, Tex,, is a spelling verifier for text 
files. It is intended for use in a cassette system in conjunction 
with a word processing program that will generate ASCII 
files, 

As shipped, Spell-Rite includes a ten thousand word dic- 
tionary that may be changed by addition or deletion. The 
program also allows the user to generate any number of 
specialized dictionaries,eachcontainingup to 1 0,400 words. 
To a technical writer, that function alone would be worth 
the price of admission. The d ictionariesare d ynamic, in that 
each file checked can be used to add to the dictionary. In 
fact. Spell Rite can create new dictionaries merely by read- 
ingtext files. The only limitations are that the words entered 
be between two and 18 characters long and eontain no 
pnnctuation other than hyphens and apostrophes. 



I \ DEALERS PLEASE WRITE FOR DISCOUNTS 




* BEAUTIFUL DETAIL 

* INDIVIDUALLY BOJEO 

* CAST IN SOLID PEIfTER 

* CLUTCH BACK 

* IMMEDIATE DELIVERY 

* EXCELLENT GIFT FOR 
THE COLOR COMPUTER PIN KEN AND NOMEN 

ONLY $5.95 PPd- <e> 



(206)365-0359 Mountiake. Terrace, WA 98043 



^ KELLY 3Qr -- . ' O'JTQftS LTD 



I n uie, Spell-Rite is strictly menu-driven, requiring one- 
key responses except when it asks for filenames, The 
machinelanguagcprogram returns to the main menuat any 
default, including a reset. The original purchase includes a 
backup copy just in case the first one crashes. The program 
carries a 90-day warranty as well. It requires 32K memory 
and Extended Color basic. 

The user hasf our options on start-up. He may elect to get 
a hard copy of the program's actions, which records the line 
number, the word position, the questionable word and the 
action taken with it, or this can be displayed on screen as an 
option. 

There is also a choice in verification mode. In the manual 
mode, the user must choose what to do with each questiona- 
ble word — to correct it if it's not in the dictionary, to add it 
to the dictionary, or to ignore it. In the auto-verify mode, the 
computer merely indicates "Unsure" for each questionable 
word and goes on. 

There's a catch to all this. The computer doesn't aetually 
correct spelling. All it does is point out words that it doesn't 
have in its dictionary, leaving any correction up to the user. 
I n effect, it's a typo-catcher rather than a spelling corrector, 
it's not a substitute for a good conventional dictionary. 

Spell-Rite ineludes a host of other features, such as a way 
to bypass embedded codes or any other set of characters, a 
dictionary word count and sort and an index sorter that is 
actually a separate, bonns program. 

I nsed Spell-Rite with Telewriter-64, after spending the 
better part of a day trying to figure out how to make the 
blasted thing save a file in ASCII format. As a last resort, 1 
turned to the Telewriter manual and read the section that 
tells how to do it. 

After saving several existing files in ASCII format, I 
loaded Spell-Rite, then followed its simple menus to load 
the basic dictionary that comes with it. Then I went to the 
menu to verify spelling and hit a very high frustration peak. 

Spell-Rile works by reading in a line of text from the tape, 
checking each word in it against the dictionary, then loading 
another line. The eassette reeorder starts and stops once for 
every line of text. My CoCo has a real fondness for the old 
I/O ERRSR and is especially finicky about thestart signal. 
Ergo, despite verifying the save with Telewriter, I was often 
shunted to the section of Spell-Rite that politely informed 
me that I had a tape error. After much gnashing of teeth and 
pounding the desktop, I managed to get a pretty good idea 
of what Spell-Rite is all about. 

The eassette error problemis nota fault in Spell-Rite. It's 
a hardware problem that seems to be a fact of life with the 
relay that sends the start and stop signals to the cassette 
recorder. If that doesn't function correetly, Spell-Rite is 
useless. 

I'm intrigued by Spell- Rite. It's well written, has very 
good documentation in the form of a 1 9-page manual and it 
has lots of room for experimentation, On the negative side, 
the program's reliance on the CoCo cassette relay gives it a 
vulnerability that can lead to frustration. 

(Eigeti Systems, P.O. Box 180006, Austin, TX 78718, $59,95 
on tape) 

-Bruce h. Sublett 
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MUSIC 



I6K 




ECB 








'Original Rags' 
For The CoCo 
Keyboard 

By Joseph M, Urbas 



T ere is a program which turns your Color Computer 
I "1 into a kind of high -tech player piano, which not 
A X. only plays pre-programmed music, but creates 
"sheet music" on the monitor screen as it goes. 

The music it plays has been stored in DATA statements 
which begin on line 1000, 1 have included a selection called 
"Original Rags," and have additional BAT A statements 
which you may plug in to play "Mary's A Grand Old Name." 



Line Description 

set up and drive the program, 
set the graphic notes in an array, 
set up the staff with a machine language 
routine called from BASiC with L'SRO. 
set up to blank the staff with a machine 
language routine called from basic with 
USRl 

get the graphic notes from the arrays set 
up in lines 80— f 70. 
put staff on a black screen with 11SR0. 
read the data information and put the 
on the staff at the proper spacing- 
plays the note. 

sends the program back to reset the posi - 
tions, clear staff and do again. 



Lines 80 560 

Lines 80—170 
Lines 180-240 
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Line 550 is a timer between notes to offset the time 

it takes to clear the staff. 
Line 560 clears the staff at the end of the music. 

Lines 570— 590 do again. 

For each note played, data is put into DA TA statements 
in groups of three. . . 

1) Graphic note (1—7) 

2) Vertical position of the note (73—112) 

3) Audio note (A-,A,B-,B.C,C+,D,E-,E,F,F+G) 



Graphic Notes 

1) Half note, stem up. 

2) Quarter note, stem up. 

3) Sixteenth note, stem up. 

4) Half note, stem down. 

5) Quarter note, stem down. 

6) Sixteenth note, stem down. 

7) Whole note. 



Vertical Positions 
73--B 
76--A— 
79--G 

82-F 

85-E 



9I--C 
94--B- 



97-A 

— G— 



103-F 

106-E 

109-» 

1 1 2-C — 

Audio Notes 

A-,A,B-,C,C+,D,E-,E I F,F+ 1 G 

They work exactly like the PLA Fstatementf or the Color 
Computer with Extended Color BASIC. 

Hints 

•After your musical selection has been entered into your 
DATA statements, add ,8,8,8 to the end of the last 
DATA statement. This will end your musical selection. 

•Keep your DATA statements short to make it easier to 
find a mistake when you make one. 

•Sheet music makes putting musical selections in fairly 
easy. 

•The graphic notes are for visual effeet, so dotted notes 
are ignored but use the proper audio note length. 

•Start your DA TA statements with line 1000, so as not to 
interfere with the driver portion of the program. 

•Take a little time to study my DA TA statement lines. 



210 02AA 

45C 05C3 

590 0760 

1100 __0BBC 
END 0F34 



10 ' SEE AND HEAR MUSIC 

30 '» JOSEPH M. URBAS # 

40 »* 107 VINE ST * 

50 . *# CANONSBURS, PA. 13317 » 
60 ** COPYRIGHT, 1983 » 

70 »####♦####♦♦####♦####♦#####♦ 
80 CLEAR500 

90 DIMA(10),B(10),C(10),D(10),E( 



10>,F(10),G(10> :cls 
100 PM0DE4 , 1 : PCLS 

110 CIRCLE(4,14),4,,.75:L1NE(£, 1 
4>-(B,0),PSET 

120 CIRCLE(19,14),4,,.75:PAINT(1 
9, 14), 5, 5:LINE(23, 14) - ( 23 , 0) , P8E 
T 

130 CIRCLE(34,14),4,,.75:PAINT(3 

4,14),5,5:LINE(3B,14)-(3B,0),PB£ 

T:LINE( 38,0) -(44,3) ,PSET 

140 CIRCLE(49,14),4,,.75:LINE(45 

, 14)-(45,2B) ,PSET 

150 CIRCLE(64,14),4,,.75:PAINT(6 
4, 14), 5, 5: LINE (60, 14) -(60, 28) , PS 
ET 

160 CIRCLE(79, 14) ,4, , .75:PAINT(7 

9, 14) ,5,5:LINE(75, 14) - (75, 28) , PS 

ET: LINE (75, 28) -(81, 25) , PSET 

170 CIRCLE(94, 14), 4, ,.75 

180 FORL-16000TO 16052 

190 READC 

200 POKEL.C 

210 NEXTL 

220 DEFUSR0= 16000 

230 DATA134.255, 142, IB, 1,167, 128 

i 140, 18,31,38,249, 142, 18,193, 167 

, 128,140,18,223,38,249,142 

240 DATA19, 129, 167, 128, 140, 19, 15 

9,38,249, 142,20,65, 167, 128, 140,2 

0,95,38,249, 142, 21 , 1 , 167, 128, 140 

,21,31,38,249,57 

250 FORL-15937T015999 

260 READC 

270 POKEL,C 

280 NEXTL 

290 DEFUSR1- 15937 

300 DATA134, 0,142, 15, 1,167, 128,1 

40, 18,0,38,249, 142, 18,33, 167, 128 

, 140, 18, 192,38,249, 142, 18,225, 16 

7, 128, 140, 19, 128,38,249 

310 DATA142, 19, 161, 167,128,140,2 

0,64,38,249, 142,20,97,167,128, 14 

0,21,0,38,249, 142,21,33, 167, 128, 

140,22, 160,38,249,57 

320 SET(0,0)-(14,2B) , A, 8 

330 BET(15,0)-(29,2B),B,8 

340 GET(30,0)-(44,2B) ,C,B 

350 GET(45,0)-(59,2B) ,D,B 

360 GET(60,0)-(74,2B) ,E,G 

370 GET(75,0)-(B9,2B) ,F,S 

360 GET(90,0)-(104,28),G,G 

390 PM0DE4 , 1 : PCLS: SCREEN 1 , 1 

400 A=USR(0) 

410 FORM-1TO500SNEXTM 

420 Q=0:P-20 

430 B-USR1 (0) 

440 READN, V,N* 

450 ON N 8OTO460, 470, 480,490,500 
, 510,520,560 

460 PUT(P,V)-(P+14, V+2B) ,A,ORSQ- 
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34: GOTDS30 

470 PUT<P,V>-<P+14,V+28),B,0R:Q- 
36SGPTO530 

480 PUT(P,V>-(P+14,V+2B>»C,OR:Q- 
18:QOTOS30 

490 PUT<P,V>-<P+14,V+2B>,D,0R:0- 
54:GOTO530 

500 PUT<P,V>-(P+14,V+2B> ,E,OR!Q- 
36:GOTO530 

510 PUT<P,V>-(P+14,V+2B>,F,0R:Q- 
18:BOTO530 

520 PUT<P,V>-<P+14,V+28),B,0R:Q- 
72: BOTO530 
530 PLAYN* 

540 p-p+Q: IFP->2366OTO420 
550 FORM=1TO10:NEXTM!GOTO440 
560 B-USR1 <0> ! FORM- 1 TO 1000: NEXTM 
:CLS 

570 PRINTS259, "PRESS ENTER TO PL 
AY AGAIN. " 

580 IF INKEY*OCHR»(13>GOTO580 
590 RUN 

1000 '###»#0RI8INAL RAGS##### 
1010 DATA6,BB,T504LBD,6, 100, 03G, 
6,94,B,5,BB,04L4D,6,94,03LBB,6,B 
B,04D,6,94,03B,6,88,Q4D,6, 100,03 
G,6,94,B,5,BB,04L4D,6,94,03LBB 
1020 DATA6,B8,04D,6,94,03B,6,B5, 
04E,5,B5,L4E,3, 1 00 , 03L88 , 3 , 97 , A , 
3, 100,G,2,97,L4A,4,94,L2BPB,6, 10 
0,LBB,6,94,B,6,91,O4C 
1030 DATA6, SB, 04LBD,6, 100, 038, 6, 
94,B,5,BB,04L4D,6,94,03LBB,6,BB, 
04D, 6 , 94 , 03B, 6 , 88 , 04D, 6, 100, 03G, 
6,94,B,5,BB,04L4D,6,94,03LBB 
1040 DATA6,BB,04D,6,94,03B,6,94, 
L4B,1,97,L2A,3, 1 00, L8B+ , 3 , 97 , A, 6 
,94,B,2,97,L4A,3, 103,LBF+,2, 106, 
L4E,2, 109, D 

1050 DATA6, 88 , 04L8D , 6 , 1 00 , 03G, 6 , 
?4,B,5,88,04L4D,6,94,a3L8B,6,88, 
04D,6,94,03B,6,88,04D,6, 100, 03G, 
6 , 94 , B , 5 , B8 , 04L4D , 6 , 94 , 03L8B 
1060 DATA6,88,04D,6,94,03B,6,85, 
04E,6,85,L4E,3, 100, 03LBB , 3 , 97, A, 
3, 100,G,3,97,L4A,4,94,L2.B,5,94, 
L4B 

1070 DATA6,B5,04LBE,5,88,L4D,6,9 
4,03LBB,5,91,04L4C,5,94,03B,6,94 
, LBB, 2, 97, L4A, 3, 106, L8E, 5 , 94 , L4B 
10B0 DATA2,97,A,6,94,LBB,2,97,L4 

A, 6,94,LBB,6,91,04C,6,94,03B,2,9 
7, L4A, 1 , 100, L2B, 5 , 79 , 04L4GP4 
1090 DATA6,76,04LBA+,5,73,L4B,6, 
76,LBA+,5,73,L4B,6,76,LBA+,6,73, 

B, 6,S2,F+,5,79,L4B,4,B5,L2E,6,B2 
, L8F+ 

1100 DATA5,79,L4B,6,G2,LBF+,5,79 
,L48,6,82,LBF+,6,79,8,6,91,C+,5, 
88,L4D,4,94,03L3.B 
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1110 DATA6,91,04L8O,5,88,L4D,6, 
91 , LBC+ , 5 , 88, L4D, 6,91, LBC+, 6, B8, 
D,6,BB,D+,5,B5 I L4E,1,97,03L2A,6, 
BB,04LBD+ 

1120 DATA5,B5 > L4E,6,88,LBD+,5,B5 
,L4E,6,BB,LBD+,6,B5,E,6,B5,E+,5, 
B2,L4F+,4,BB,L3.D 

1130 DATA6,76,04L8A+, 5,73,L4B,6, 
76,LBA+,5,73, L4B,6,76,L8A+,6,73, 
B,6,B2,F+,5,79,L4B,4,S5,L3E 
1140 DATA6,B2,LBF+,5,79,L4B,6,B2 
,LBF+,5,79,L4B,6,B2,LBF+,6,79,B, 
6,91,C+,5,88,L4D, 1,94,03L3B 
1150 DATA3,97,03LBA,2,97,L4A,3,9 
7,LBA,5,B5,04L4E,5,B5,E,6,BB,LBD 
,5»79,L4G,6,B5,LBE,6,BB,D 
1160 DATA6,94,03B,2, 1 00 , L4G , 6 , 97 
, LBA, 6,94, B, 6, 91,040,5,94, 03L4B, 
3, 100,L8G,2,97,L4A,7, 100,L2QP4 
1170 DATA6, B8,04LBD,6, 100,O3G,6, 
94,B,5,BB,04L4D,6,94,03LBB,6,BB, 
04D,6,94,03B,6,BB,04D,6, 100.O3B, 
6,94,B,5,BB,04L4D 

1180 DATA6,94,03LBB,6,BB,04D,6,9 
4,03B,6,85,04E,5,85,L4E,3, 100,03 
L8B,3,97,A,3,100,B,2,97,L4A,4,94 
, L2 • B , 5 , 94 , L4B 

1190 DATA6 , ,85,04L8E,5,BB,L4D f 6 t 9 
4,03LBB,5,91,04L4C,5,94,03B,6,94 
,L8B,2,97,L4A,3, 1 06 , L8E , 5 , 94 , L4B 
1200 DATA2,97,A,6,94,L8B,2,97,L4 
A,6,94,L8B,6,91,04C,6,94,03B,2,9 
7,L4A, 1, 100,L2G,5,79,O4BP4,B,B,8 



Mary's A Grand Old Name 

1000 'MARY'S A GRAND OLD NAME 
1010 DATA3 , 1 09 , T403L 1 6D , 3 , 1 00 , LB 
.G,6,94,L16B,4,BB,04L2D,4,94,03B 
, 1,97, A, 1, 106, E, 3, 103 s LB.F+,3, 10 
0,L16B,3,97,L8.A,3,103,L16F+,2,1 
09,L4D,2, 103,F+, 1, 106,L2.E,3, 109 
,L16D,3, 106, LB. E, 3, 103,L16F+ 
1020 DATA2,97,L4A, 2, 100, G, 2, 103, 
F+,2, 106,E,2, 103, F+, 2, 100,G,2,97 
,A,2, 109, D, 1,97,L2A, l,97,A+,4,94 
,L2.B,3, 109,L16D,3, 1 00, L8. 8, 6, 94 
,L16B,4,88,04L2D,4,94,03B 
1030 DATA1,97,A, 1, 106, E, 3, 103, LB 
.F+,3, 100,L16B,3,97,L8.A,3, 103, L 
16F+,2, 109,L4D,2, J03,F+, 1 , 106, L2 
.E,3,109,L16D,3, 100,L8.B,6,94,L1 
6B,5,B8,04L4D,5,88,D+,5,85,L4.E, 
6,94,03LBB 

1040 DATA5,85,04L4E,5,88,D,5,91, 
C,6,94,03LB.B,3,97,L16A,1, 106,L2 
. E, 1, 103, F + , 1 , 100,L2. .BP4,B,B,B 



CORRECTIONS 

@. T 



Note: Circled number* are cartridge connector pin 
numbers for Radio Shack Color Computer. 



H 1 



In John R. Kelty's "A Cheap Talker For Our CoCo"(July 
1983, page 276), the accompanying schematic had a few 
errors. Writes Kelty, "Most readers would notice the pin 
errors on the 6821. It would not really matter if these were 
reversed anyway, except that the inflections would be 
inverted and the speech might sound like Chinese." Check 
pins 8 and 9 on the revised schematic and also note that the 



4.7K ohm resistor at CA1 should be "pulled up," +5VDC 
(not +3). The series resistor with the I0K pot is 2K and, 
finally, the clock capacitor of 220 pF to ground was left off. 
We had a number of calls about these mistakes and regret 
any inconvenience they caused. The corrected schematic is 
reproduced for your reference. 



Submitting Material 
To the Rainbow 



Contributions to the RAINBOW we welcome from 
everyone. We like lb run a variety of programs -which wilt be 
useful/ helpful/ fun for other CoCo owners; " , ; /' ; 

Program submissions must be on tape or disk and it is best 
to make several saves, at least one of them in ASCII format. 
We're sorry v but we do not have time to key in programs. Ail 
programs should be . supported by some editorial 
commentary, explaining how the program works. We're 
much more interested in how your submission works and 
runs than how you developed it. Programs should be 
learning experiences. .' „• ; -' T * '..',f y ".^ / -* 

We do pay for submissions, based on a number of criteria. 
Those wishing remuneration should su sttite when making 
submissions. • ■ ■ , '/./■■ . / / - 

For the benefit of those who wish more detailed infor- 
mation on making submissions, please send a SASE to: 
Submissions Editor, the 8AIHB0W, P.O. Box 209, 
Prospect, KY 40Q59. Wc will send you some more 
^uimpre"hensive guidelines. . „y f s/S. „S2.' $M'-'* 

Please do not submit programs or articles currently 
submitted to another publication. 



Apparently due to an error in paste-up at the Rainbow, 
the first segmeutofline 10 was left out of the listing for Mike 
Hall's "Trailin'Tail"( August 1983, page 36). That line, in its 
entirety, is: 

10 CLS:DIMCH*(43),X(99),Y(9?),A( 
4> ,B<4> ,E(10> ,S(U> ,S»(11> ,G<50) 
: FORZ= 1 T043: READCH* < Z ) : PLAY " L255 

; aba" : next: forz=itoi0: s ( z ) =0: s* < 
z>=" ":next 

Joel Robbins reports that in his Autodesigner listing in 
"Talk About Your Chopped Down Ford!" (August 1983, 
page 50), there "were some 'ghosts' from an earlier version 
that didn't affect the running of the program, but might 
appear as real mysteries because they arc useless com- 
mands. "To "clean up" the listing, delete lines 103, 106, 107, 
122 and 123. Change line 121 to read: 121 RETURN and 
that should do it. 

Ken Ostrer's "Treasures of the Enrakian Empire," 
(August 1983, page 122), needs a POKE 25,6: NEWpriot to 
loading in order to free up enough memory. We apologize 
for not noting this in the article. 

Don't ask us how it happened, but a colon was omitted 
from the end of a line in the listing for Jim Schmidt's 
"Everything You Wanted To Know About Hex. . "(April 
1983, page 186). Line 16030 should properly read: 
1 6030 N 1 *=HEX* < N 1 ) : N2*=HEX* ( N2 > : 
A1*=HEX*<N1-N2> ^ 
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RECEIVED & CERTIFIED 



The following products have been recently received by the Rainbow, examined by our magazine staff and approved 
for the Rainbow Seal of Certification, your assuranee that we have s#en the product and have ascertained that it is 
what it purports to be. 

This month the Seal of Certification has been issued to; 



Time Teacher, q 16 K ECB educational pro- 
gram for ages 5-11 with six skill levels. It 
reinforces and assists children in learning to 
tell time by having them convert the time 
displayed on a traditional clock into digits 
using the keyboard. Includes two; ljitiitfUfe,' 
modes, two quiz modes and a detailed jtfs- 
gress report with the student ^iia me that can 
be displayed to screen or printer. Crystal 
Software, 6591 Dawsey Road, Rock Creek, 
OH 44084, tape $15.95'. 

Trekbest, a I6K ECB Trek game. Objective: 
You are in command of a prototype^es- 
troyerwiththe missiun uf -.topping the Klys- 
tar from successfully invading your home 
space. Hyperion Software, P.O. B»x 196. 
Lagrangevi!le,NY 12540, tape $16.95. 

Babylon, a 16K game with ten kkill levels. 
Objective: You are governor of Babylon and 
in the best interest of its citizens, you must 
manage the city's assets; land, grain, and the: 
people themselves (as sources for farmers 
and asfrjeftibers of the- city's defensive army) 
while contending with enemy invasmit, poor 
crops, plague, and other disasters that arise. 
Valhalla Enterprises, P.O Box 243, Sum- 
ner, W A 98390, tape $12.50. 

Electronic Graph, a 16K ECB function 
graphing program that will graph any func- 
tion using low, medium or higti-reso3ution 
graphics and overlay as many of the func- 
tions on a graph as you wish usittga I PVH . 
or look-alike printer, ValhaHa.EnUiprises, 
P.O. Box 243, Sumner, WA 98390,; tape 
$ 14.56. 

Great New Adventures In Wonderland a 

32K 100 percent ML adventure, fantasy 
world game peopled with the creatures of 
Lewis Carroll's magination, "Alice In Won- 
derland." "Through The Looking Glass," 
and "The Hunting of the Snark" blended 
into one landscape. Objective; Y ou are Alice. 
As you wander through Wonderland, you 
must become a queen (on the chessboard 
landscape), help capture the nasty Snark, 
and get home again. Prickly-Pear Software, 
9234 E. 30th Street, Tucson, AZ 85710, tape 
$24.95, disk $29.95. 

T1MSMAIL, Tape Information Manage- 
ment Systems Mailing List, a 16K Extended 
BAStC modification of TIMS (a generalized 
data management system) to address the 
special requirements of label printing that 
cannot be handled by the more generalized 
TIMS print mode. T1MSMA1L provides 
eight Fields selected in such a way as to facili- 
tate searching, editing, sorting and printing 
the mailing list. Includes a 15-page user 
manual. Sugar Software, 2153 Leah Lane. 
Reynoldsburg, OH 43068, tape S19.95. 



Shaft, a 16 K 100 percent ML arcade game. 

Objective- Maneuver your man across . I he 
k: ?»,)} while avoiding the eight crushing-ele- 
vators, as they move up and down m one of 
several random patterns, and trytoreJCnthe 
next floor. Prickly-Pear Software, 9234 E/ 
30th Street, Tucson, AZ 85710. tape $24.95, 
disk $29.95. 

T«ps» TWvy.o'KiK ECB educational word, 
garni.- forone'to ri* players Objective- Play 
against your opponent and form as many 
\ three or mare letter words as you can fram 
the ten letters chosen at random by ttie com- 
puter. Prickly -Pen i -SW ware, 9234 E. 30th 
Street, Tucson, AZ 85710, tape $19.95, disk 
$24 95 

Disk Manager, a 1 6/32 K. disk utility pro- 
gram that provide* all the facilities needed to 
manage disk files. It will date files on the disk 
directory; print a directory that include* file 
size; creation date; granule locations; and 
machine language program start, end, and 
exec locations. Disk Manager will also 
create and save a catalog of all the files on a 
collection of disks, find a particular file or 
group of files in the catalog, restore killed 
files, eomple'.ely recover a disk with a dam- 
aged directory and most output from the 
programcar be sent to the screen, printer or 
both. Prickly-Pear Software, 9234 E. 30th 
StreeCTueson, AZ; 85710, tape $??„9.5, 

Music Box.a I6K ML program that .1* is you r 
composfclortypeinf rora ; siSeet music) a song 
in four-part harmony, assign a different :' 
instrument to each voice, or use one instru- 
ment f»r several'parts. Inuiidc:. a song by 
Bach and instructions, Prickly-Pear Soft- 
ware. 9234 E. 30th Street. Tucson, AZ 
85710, tape $24.95, disk $29.95. 

Disk Zapper, a 32/64K programmer's aid, 
disk-fixer, editor and formatting utility. It, 
can be used to protect disks, change the 
information t on disks, and backup many 
disks toat have been altered to make backup 
impossible: Prickly-Pear Software, 9234 E. 
30th Street, Tucson, AZ 85710, disk $34.95. 

CoCo Mail, a 16K menu oriented, mailing 
list system to be used to maintain a list of up 
to 200 files per disk, containing name, 
address, city, state, zip. phone numbers, spe- 
cial code, and notes with a maximum of 256 
characters per file. The special codes record 
of each file allows the system user to mark 
each record for specialized printouts. Files 
can be moved from one d isk to another and 
prints two across or single labels. Includes a 
15-page instruction manual. Reitz Compu- 
ter and Electronics, 3170 W. Central 
Avenue, Toledo, OH 43606, disk $59.95. 



Graphic Ser*en Print Program, a 16K ML 

graphic screen print program that works in 
a.11 PMODES and lets you shift screen 
images anywhere on the printed page. Avail- 
,;iSie*af-bpth Color BASIC 1.0 and LI. Cus- 
tom Software Engineering, 807 Minutemen 
C:tc..-*wav. Cocoa Beach, FL 32931, tape 
$9.95. 

Statement Writer, a 32K. program that sup- 
plements the capibilfc^bf the Disk Double 
Entry (DDE) program and allows you to 
select certain BMh accounts for special 
treatment, add supplemental infarmatian 
and ioi mai the ledgers for these accounts to 
satisfy special Tieeds. The progimn will take 
receivable accounts, add full cusl timer name 
and address, ana produce statements suita- 
blefor billing. Statement Writer will also 
produce nummary reports lot selected ac- 
counts to provide overall ,,-ibi .tv #f 
account status and activity. The user should 
be familiar with the Concepts and operation 
of VDt '-before attempting to use this pro- 
grarn Custom Software Engineering, 807 
Minutemen Causeway, Cocoa Beach, FL 
.-293 1, tape $34.95. ; 

Data-500, a 1 6K menu-driven data baseutil- 
ity program that will store up to 3,000 char- 
acters on one file and print to screen or 
printer. Litefrac Software, lnc. s ZM2 N. 
Magfloria,Tus<^n.i AZ.j§'5?l.2, tape $12. 

Cosmic Clones, a,16K '.Mis' arcade"-^ game, 
•bjecti ve: ^chic^frihfeMgh^'t scope possible 
by eliminating the Clonial invasion forces 
while pfdt«cting ■•,<>•■',• star&ase' fuel cells. 
Majk Data Products, 24O0J Alicia Park- 
Wav.No. 226, Mission Viejo. 0\ 92691, tape 
S24.95. 

ElBandito, a 16 K ML game for one or two 

players with eight skill levels. Objective: 
Maneuver your bandits through passages 
and iflto tUflnels^wbflc; dodging menacing 
spiders and returning bounty to your fair. 
Mark DaikPndduc^ 24031 Alicia Park- 
way, Slo. 226, Mission Viejo, CA 9269 1, tape 
$24.95. 

Flexi-Filer, a 32K data hase management 
system for applications such as mailing lists, 
inventory, sales records, expense records, 
etc., with many features that allow y»u to 
customize the system, Flexi-FUer will called 
up ta 35 elements per reeord, with up to 240 
characters per record. All or any selected 
subset or record* can be sorted in ascending 
or descending order by any of the 35 f ields. 
Includes a 32-page instruction manual and 
requires an 80 column printer. Computer- 
ware, Box 668, Encinitas, CA 92024, disk 
$*4.95. 
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i, a 4K ML monitor designed to 
allow direct access to the 6803 microproces- 
sor, the hear of the Radio Shack TRS-80, 
Model MC-IO. It contains the necessary 
tools to: examine the contents of the MC-IO 
operating system ROM and discover many 
of the routines contained therein; examine 
and change contents of memory in RAM 
based programs; save and load ML pro- 
grams using assette tape; create your own 
ML programs; use breakpoints and register 
displays for debugging and testing ML pro- 
grams, routines; and dumps listings or 
memory contents to printer for hardcopy 
ecording. Includes a 9-pagc instruction 
manual. MicroTen Software Company. 495^ 
Amboy Avenue. Perth Amboy, NJ 9886L- 
tape $19.95. i-iHUr: 
Spelling Bee, a 1 6K EC B word gstroefatlpne 
or two players of ages icven to adult, using 
high-resolution animafea jsr^lges. Objec- 
tive: Help Ray Bee fii^hf i«|tefi> that make- 
up the word hidden mine (lower by input* , 
ting letters using ihe ksylboard. The^gime 
comes complfte with "A file of 2(^0 words. " ; 
three game wiwiotw and two. skill level*. 
Players caitalaWv'siy the difficulty by creat- 
ing word> fists fliat can be spvsd on tape. 
Crystal Sirftmrb, 659 J DawaeyRoad. Rock 
Creek. Oft 440R4, tape ST5s<Sfc If . * 



& a 16/32K menu driven system 
luens ycur CoCo into a flexible t<scilrfor 
matheiButi^ and engineering by matypulat- 
ingjiktriais and vectors, performing frith 
graj&orj arid differentiation, solviri|. qajj- 
ratit ;e$B$ions, and pfcrtring user defined 
functions? Includes- a -32-paae reference 
manual. Inter Action. 113 Ward Street. 
Department F, New Haven, CT 065 19. tape 
$44.95, disk $49.95. 



s, a 16K Ml maze game for one or . , 
two players Oujfcrrve; Race your opponent ' 
through a randomly generated. maze with : 
invisible; walls, - lt.vA the player fcittthemj 
whiV^.oth gbcc*\ 1 apsand citing rn. * 
tups j« - i n> jnent a ' v \ • be 1 he 
tit st tocomr t ' ma .. Mar> Dnih 
due s, 2^001 Alicia Parkway, No. 224 Mis- 
sion Vtfe-jo, CA 92691. tape $24.95. 

Gtaxxons, a I6K super hi-res, ML space 
game for one or two players with seven skill 
levels. Objective: Achieve th* highest s*ore 
by eliminating as manf^ogpwjg jajjOiv- 
ing, enemy attacking space crafty as possi- 
ble, while avbid.iflg$?yoiilipwn destruction. 
Mark »ata Products, 24001 Alicia Park- 
way, No. 226. Mission Viejo, CA 9269 1, tape 
$24.95. 

Recall, a I6K utility program that will re- 
cover material lost to the I/O ERROR in a 
casse te crash. It reeovers both basic and 
machine language. Time Software, P.O. 
Box 1014, Clea rfield, VT 8401 5, tape $14,95, 



Disk Graphics, a I6K ECB program that 
allows you to plot a variety of char s and 
display them on a screen or print them on a 
graphics printer. With its multifaeeted, 
chart-plotting capabilities, Disk Graphics 
has many practical, business, scientific, and 
engineering applications. Radio Shack 
Stores nationwide, disk $49.95. 

Amortisation, a I6K ECB program de- 
signed to provide you with complete infor- 
mation concerning simple interest loans. 
The program will print the following on the 
screen or pr inter: a running total of principal 
still to br paid;amount ofmomblv pivment 
applied v the principal balance: amount of 
iinSHaijfij^yroeW ^-applied to »n»&e#; 
.tbtkl monthly payment; the toiai amoiirf? 
"paid into principal to date; the total of inter- 
est paid to date; fttwttbe t^iaj amount paid to 
date Ibfnwfcr.v-. P.O. Box 1 5?3, ; .5afT Lake 
CRy r tH 84ltO,Ja p(: Sll.95 
- . GXifnMi t a 16k automatic te lephdnediat • 
ine -program that outputs telephone digit* 1 
through your television speaker. You can 
enter and save directories on, tap*, and each 
directory wiH contain up to 1% names and 
numbers Require*' bCB and toach-iwne 
phcrtc icrvjee Chii* Computers, f>29»ARj«r- 
^wdbditine. Delta, B.C., Canada V4fi %M, : \ 
Ijtajfe $29,95. 

The Cheap Talk r, a I6/32K ECU speech 
synthesis system that comes fully assembled 
and tested. Includes cartridge with s cketed 
SC-OI, program and users manual. Kelty 
Engine ring, 1440 N. 61st, Lincoln, NE 
68505, tape SSt. Printed circuit board for 
Cheap Talker SI5. 

INTBASIC 1.0, a I6/32/64K interactive, 
self-contained integer RASiC compiler. The 
compiler was designed to optimize program 

space and memory requirements, white stUl 
' maintaining syntax uructarei used jn Color . 
Basic. IKTBASIC.1.0 breaks a sf^xc pra- 
gmm tma thre; \ <*> n ji entorv with 
the variable storage area Qcwpgmg trie- 
- fourth. The fo&r areas or. memory- are useii* 
lor main pr v m ',t ige lM tab sick 
•age (print text f, jufernutigelfiOTa-geahd van- 
able "storage. WavatcHwa're, P.O. Box 
510371, Salt Lake City, UT 84151, tape 
$39.95. 

Zjtut, a 1$K ML arcatjc game. Objective;, 
: * ^uzure "the mighty wSartt and y«m must 

* fighf 6fi ttfc.thJMidsrbof'.s from the Thunder 
■j Godr-Z*u*: As the Owe of Cold, destroys 

* the thunderbolts, you must use your sliieid 
for protection. Aardvark," L.T.D., 2352 S. 
Commerce, Walled Lake, Ml 48088, tape 
$ 19.95. 

Caitiette Directory, a *K program thai will 
read- a tape cassaife and print a directory of 
each,. Me fouad on the cassette CoCoPro. 
PO B«' T '~<):? Louis MtMOfdKi.pt 
$2.50. 



Graphic Math Adventure, a 32K ECB edu- 
cational adventure game in 24 skill levels. 
Objec ive:Searchfortreasureonland, river 
and in caves. Your search is blocked by 
many obstacles which ean be overcome by 
correctly answering math problems of addi- 
tion, subtraction, multiplication and div- 
ision. Software Factory, 1333 Morgan Road, 
Bremerton, WA 98312, tape $21.95. 

Statgraf, a 32K ECB, mcnu-driven, linear 
regression analysis package combined with a 
high resolution plotting/li e graphing sys- 
tem, The user c n enter pairs of data points 
(either from the keyboard, tape oi disk), edit 
ilbe data, obtain a table of s atiatics, and plot 
Uh%orj)gh>al or transformed data in a variety 
;^)f-.iis?T. defined configurations. Includes a 
T4ftpirgeiiseiVrMmual. Sugar Software, 2 1 53 
l:cah Lans, Rcynoldsburg. OH 43068, tape 

,Ftuy, a 32K- talkitigifc'ar. game. Objective: 
ytju are the sole defcridef rbfyour homeland. 
i As:th* Communis £&ove tn-you must shoot 
.dewri airplanes, heBcwpiera; hot air bal- 
loons,' parachutes and. magnetic air mines 
while waitraglor the CrA backitpto arrive. 
Computer Shack, 1691 Easoh. Eontiac, Ml 
; 48054, disk $29,95. 

Celorcopv, a ^2 S. menu-driven copy.gtility 
(ha| copies da^fHesror programs: ilisk to 
wpe, tape to disk or disk to disk. Tt ajso.kilk 
files or programs. ! 'C6CoPro. ; P.O. Box 
37022, St. Louis,. MO. 63 141 , taps SJ.5, ' - 

Pa*out T a ■■16K/32K"Stec«»unts payaije sys- 
tem' Written for tfie 'RarJio Shatk Coio.- 
CompCtBratid the Lifte printer V-lfr Sector 
Software.' 17 Waynewood Drive, Dart- 
mouth. Nova Scotia, Canada B2W IG1, 
tape $29 95. 

I'ajrup, a '6K 12K accQitnts receivuble sys- 
tfm written for the -R. ii< Sfia» ■ Color 
Computer and the i \ta Printer VI]. Sector 
Sohware, Wayjieftot.^ Drive. »an- 
mouth N»va BEOtia, Canada B2W 1GI, 
tape $jy 9$ 



Mailer/tetter Writer, two pro- 
grams — a database mailer and a two-part 
letter writing program, both designed to 
create, maintain and utilize stored informa- 
tion for IGK, and32K. tape or disk svstems. 
The first part of Letter Writer will help you 
;; crea"« md edit a letter file and the second 
; part will allow you to print using your letter 
I file and to merge wEth Database Mailer pro- 
gr m. Includes a 36-page user's manual. 
EVS System Engineering Company, 9528 
Miramar Road. Suite 35, San Diego, CA 
92126. tape or disk S49.95. 



The Seal of Certification program is open to all manufacturers of products for the TRS-80 Color Computer, the 
TDP-I00, or the Dragon-32, regardless of whether they advertise in the Rainbow. By awarding a Seal, the magazine 
certifies the program does exist, but this does not constitute any guarantee of satisfaction As soon as possible, these 
hardware or software items will be forwarded to the Rainbow's reviewers for evaluation. 

— Jutta Kapfhammer 
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EDUCATION 




By Jeff Pyne 

Here's a conversion program that will bridge the measure- 
ment gap and tell you how wide it is in both feet and meters. 



Did you ever want to run in a 16 kilometer race, but 
decided not to because you weren't sure- if you could 
run that far? Or perhaps you have needed to figure 
out how many liters of gas are required to fill a 10 gallon 
tank? Well, here is a program written by Jeff Pyne that will 
help you solve your problems. Convert is a useful program 
that makes it easy to convert inches to millimeters, inches to 
centimeters, feetto meters, miles to kilometers, square feet 
to square meters, U.S. gallons to liters, Imperial (British) 
gallons to liters, ounces to grams, pounds to kilograms, 
fahrenheil to Celsius and vice versa. 

After CLOADing and RVNing, you will find the menu 
which lists all the conversions. You will be asked which 
operation you would like and then asked how many inches, 
feet, ounces, etc. 

This program is a good tool for teaching the young and 
old alike. So, the next time you arc asked to run in a 6K race 
with some friends, you can tell them, "I can do 17284 miles 
easy!" 



The listing: 




***** 



10 * *********** 

15 * * metric * 

20 ' * conversion * 

25 ' * BY JEFF PYNE * 

30 ' * PORT MOUTON, * 

35 ' * N.S. CANADA. * 

40 7 ****************** 

45 CLS: SOUND 200, 1 : PRINTS13, "men 



S" 






65 


PRINT" 


D) 


S" 






70 


PRINT" 


E> 


75 


PRINT" 


F) 


80 


PRINT" 


G> 


85 


PRINT" 


H) 


RS" 




90 


PRINT" 


I) 


LITERS" 




95 


PRINT" 


J) 


10G 


) PRINT" 


K 



50 PRINT" 
55 PRINT" 
60 PRINT- 



END 

METRIC INPUT" , 
I NCHES-M I LL I METER 



D) INCHES-CENTIMETER 



I) IMPERIAL GALLONS- 



105 PRINT" L) FAHRENHEIT— CELSI 

US" 

110 PRINT: PRINTTAB (8) "WHAT OPERA 
TION?" 

115 AN*=INKEY*: IF AN*="" THEN 11 
5 

120 AN=ASC<AN*>-64 

125 IF AN*<CHR*<65) OR AN*>CHR*( 

76) THEN 115 

130 ON AN GOTO 135,295,140,155,1 
70, 185,200,215,230,245,260,275 
135 CLS: END 

140 CLS: INPUT "HOW MANY INCHES"; I 
145 PRINT-THAT IS" ; 1*25. 4; "MILIM 
ETERS" 

150 60SUB 540: GOTO 140 

155 CLS: INPUT"HOW MANY INCHES"; I 

160 PRINT "THAT IS" ; 1*2. 54» "CENTI 

METERS" 

165 GOSUB 540: GOTO 155 

170 CLS: INPUT "HOW MANY FEET" % F 

175 PR I NT "THAT IS"; F*. 3048; "METE 
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RS" 

180 GDSUB 540: GOTO 170 

185 CLS: INPUT"HOW MANY MILES"|M 

190 PRINT"THAT IS"! M»l . 60931 "KIL 

OMETERS" 

195 80SUB 540: SOTO 185 

200 CLS: INPUT"HOW MANY FEET (2) "? 

FF 

205 PRI NT "THAT IS" ; FF#. 0929; "MET 
ERS(2) " 

210 GOSUB 540: GOTO 200 

215 CLS: INPUT"HOW MANY U.S. GALL 

ONS";G 

220 PRINT"THAT IS " » G»3. 7854; "LIT 
ERS" 

225 GOSUB 540: GOTO 215 

230 CLS: INPUT"HOW MANY IMPERIAL 

GALLONS" j G 

235 PRINT"THAT IS" ; 6*4. 546; "LITE 
RS" 

240 GOSUB 540: GOTO 230 

245 CLS: INPUT"HOW MANY OUNCES";0 

250 PRINT"THAT IS" ; 0*28. 35; "BRAM 

S M 

255 GOSUB 540: GOTO 245 

260 CLS: INPUT "HOW MANY POUNDS " ; P 

265 PRI NT" THAT I S" ; P*. 4536; "KILO 

GRAMS" 

270 GOSUB 540: GOTO 260 

275 CLS:PRINT"HOW MANY DEGREES" 

280 INPUT"FAHRENHEIT"; F 

285 PRINT" THAT IS"; ( F-32) *5/9: PR 

I NT"DEGREES CELSIUS" 

290 GOSUB 540: GOTO 275 

295 CLS:SOUND 200, 1 : PRINTS13, "me 



300 
305 
310 
ES" 

315 PRINT" D) CENT I METERS- INCH 

ES" 

320 I 
325 



PRINT" A) END" 

PRINT" B) IMPERIAL INPUT" 

PRINT" C> MILL I METERS- INCH 



PRINT" E) METERS-FEET 
PRINT" F> KILOMETERS-MILES 



330 PRINT" G) METERS (2) -FEET ( 2 

) » 

335 PftINT" H> LITERS-U.S. GALL 
ONS" 

340 PRINT" I) LITERS-IMPERIAL 
GALLONS" 

345 PRINT" J) GRAMS-OUNCES" 

350 PRINT" K) KILOGRAMS-POUNDS 

355 PRINT" L) CELS I US—FAHRENHE 
IT" 

360 PRINT: PRINTTAB(B) "WHAT OPERA 
TION?" 

365 AN*=INKEY«*. IF AN*="" THEN 36 
5 



370 AN"ASC(AN*>~64 

375 IF AN*<CHR*<65) OR AN*>CHR*( 

76) THEN 365 

380 ON AN GOTO 135,45,385,400,41 
5, 430, 445, 460, 475, 490, 505, 520 
385 CLS: INPUT"H0W MANY MILLIMETE 
RS";M 

390 PRINT"THAT IS" ? M*. 0394; "I NCH 
ES" 

395 GOSUB 540: GOTO 385 

400 CLS : INPUT" HOW MANY CENT I METE 

RS"iC 

405 PRINT"THAT IS" I C*. 3937; " INCH 
ES" 

410 GOSUB 540: GOTO 400 

415 CLS: INPUT" HOW MANY METERS" ; M 

420 PRINT"THAT IS"; M*3. 2808; "FEE 

T" 

425 GOSUB 540: GOTO 415 

430 CLS:lNPUT"HOW MANY KILOMETER 

S";K 

435 PRINT" THAT IS";K*. 6214; "MILE 

S" 

440 GOSUB 540: GOTO 430 

445 CLS : INPUT" HOW MANY METERS <2) 

"; MM 

450 PRI NT "THAT IS"? MM* 1 0 . 764 * " FE 
ET(2) " 

455 GOSUB 540*. GOTO 445 

460 CLS: INPUT "HOW MANY LITERS" ;L 

465 PRINT"THAT I S" ; L*. 2642; "U. S. 

GALLONS" 
470 GOSUB 540: GOTO 460 
475 CLS: INPUT"HOW MANY LITERS" ;L 
480 PRI NT"THAT IS"; L*. 22; " IMPERI 
AL GALLONS" 

485 GOSUB 540: GOTO 475 

490 CLS: INPUT"HOW MANY GRAMS" 5 G 

495 PR I NT "THAT I S" ? G*. 03535 " OUNC 

ES" 

500 GOSUB 540: GOTO 490 

505 CLS: INPUT"HOW MANY KILOGRAMS 

";K 

510 PR I NT "THAT IS"! K*2. 20465 "POU 
N»S" 

515 GOSUB 540: GOTO 505 

520 CLS: PR I NT "HOW MANY DE8REES" 

525 INPUT"CELSIUS"?C 

530 PRINT" THAT IS"' <C*9/5) +32: PR 

INT"DEGREES FAHRENHEIT" 

535 SOSUB 540: GOTO 520 

540 PRINT: PRI NT" ANOTHER (Y OR N) 

?" 

545 RP*=INKEY$: IF RP*="" THEN 54 
5 

550 IF RP*<CHR*<65> THEN 545 
555 IF RP*="Y" THEN RETURN ELSE 
45 
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EDUCATIONAL UTILITY 



.12 K 

ecb 




(Paul Uictke. *hn t\ narking toward a 
mas/cTi degree m vanifiuier assisted 
education, teat hex oil trie Junior high 
Sihotl lew! at Grace Lutheran School 
(iYLLS) in Dunmd. i\tU iliglin ) 



Grade A veraging Could Be 
Handy Teacher's Aid 



By Paul N. Luetke 



Grade Averaging is an attempt at \%hat I consider useful programming, ll 
ksn'r Ibai game programs arc useless, but I Ted ihnl CaC.a should fllsfi he 
used in save ume so that there's s»me left in which to play all those jircal 
games available for I he powerful Color Computer I hegfln uriling ihiK program in 
Novcmhcr ol 198 1 , atauul one month alter purchasing my Color Computer I must 
give due credit 10 Al Ponicraniz.aBood friend ol'mmc. who not only convinced mc 
nt CoCo's po^-cr. but also gave m£ valuable help with this program 

In order lo use ihts program as is. you musl either use my sysiem of grades re- 
curd keeping or adapt yours ta&u'u. I keep cumulative records throughout ihcycai 
using numbers which are later convened to letter grades. The followingcxumplc 
should help to illustrate. 

A+-U,A=H,A = 2.B + = 3.B^4.B-=5.C+=6 .C=7.C-^8. D+ = #. D = iu. 
D— II, F — 12, and incomplete work coonts as a ZERO, or a 40 tn this scale 



NAMF Mon i 1X9 
Frank I 8 
grades — A C 

H«+7) B(g+2) 



Wed Thurs Fn TOTA1 

EO 16 19 19 

A- C+ B+ Bavg. 

10(10*6) 16(16+2) l«J 



The first few lines of the program use a neat little routine I learned i n order to 
ckrai ilie graphics pagts without doing it diiecily from the keyboard The program 
is initiali/jug the numerous strings while the cTcdn page ison screen. 

The first menu to appear on screen asks ihc user to identify himself. The program 
is pi .• m. hi I s set up for four teachers and t hiriy students, but could ensjly be adopted 
for more b> adding the needed names in line 2g0 and tn the dam statements 
beginning at line 1 150,. When entenngthis data be sure that the first name is thai o( 
the teacher and that at Ic-asl 30 bits of data arc recorded meludiog empty quotes or 
you uill get an OD error The dimension statement tn line 1090 must also he 
changed appropriately CS is for teachers' and students' names. A isthc \ ariahle for 



daily grades and B is for test grades. PA refers to percentile 
average, GC refers to grade code, and FA is for the final 
average, the FOR/ NEXT loops in lines 1100 and 1110 
must also be changed if more teachers or students are to be 
used. Since I only have data for one teacher in the program, 
the X lodp is I TO I . 

The second menu allows you to choose the subject to 
average. To change these subjects, edit lines 320 and 330 and 
2320—2410. Note that the variable GC indicates the number 
of periods per week that the class is in session. Ari example 
of this would be language which is taught four days per 
week. This item is used in determining the student's overall 



After entering the subject t» average, the program will ask 
for the number of daily grades that you are averaging for 
that subject. Next, it asks for the number of test grades to be 
averaged. 

Lastly, the program will ask for the grade weighting 
desired f or each. The total of the two numbers entered here 
should be equal to 10. I use different weightings for each 
subject, but i f daily grades count for 60 percent of the final 
grade and test grades count4t percent, then you wonld enter 
a 6 and a 4 respectively. If no tests weregiven, then enter a 10 
for the weighting of the daily grades and a 0 for the test 
grades. 

The actual grade calcula lions take place in lines 770 — 790, 
The printing routine which prints both a class report and 
individual reports begins in line 1420. The program is writ- 
ten for the Line Printer VII. 

Enter PMODEO before loadirig the program. 

I hope that this program will be of use to many of you, 
especially those of you who are teachers, 1 have been print- 
ing weekly report cards for all of my students for the past 
two years. It takes me only about 20 minutes to enter allof 
the grades for all 10 subject fields. I have found that both 
students and parents appreciate it very much. It helps me 
also, because there are no surprises at quarterly marking 
periods anymore. 

I realize that the program is quite long, so if you don't feel 
like typing it in, send mc $5 to cover shipping and handling 
and I will send youa copy. Write to: Paul N. Luetke. 8499 E. 
M-71 Lot 143, Durand, Mich., 48429. 

The listing: 





r 

300.. 


. 01AE 


1460. 


. 0FED 


420.. 


. 049F 


1670. 


. 1288 


620.. 


. 071F 


1830. 


..1472 


840.. 


. 097F 


2010. 


. 177A 


1110,. 


. 0B9A 


2180. 


, 19AA 


1320. 


. 0E1& 


END. 


.1OE0 



100 PMODE0 
110 GOTO130 
120 GOTO140 
130 GOTO2300 
140 REM 
150 PCLEARi 
160 CLB 

170 PR1NT8135, "GRADE AVERAGING" 
180 PRINTO206, "BV ,, :PRINT@232, "PA 
UL N. LUETKE " 

190 PRINT@329, " " 

200 GOTB220 



210 Z*<=INKEY*: I FZ*< >" " THENRETURN 

EL5E210 

220 CLEAR500 

230 GOSUB1090 

240 FORX=1TO30:FORSC-1TO10:FA(SC 
, X)«100:NEXTSC,X 
250 CLS 

260 PRINT: PRINT" NAME COD 
E" 

270 PRINTSTRINB* (32, " = " > 5 : PRINT 
280 P R I NT "LUETKE 1":PRINT 
" HATZUN6 2 " : PRI NT" MUNDT 

3 " : PR I NT " LUEDTKE 4": 
PRINT: INPUT "teacher code"|TC 
290 CLS 

300 PRI NT "SUBJECT CODE" 
310 PRINTSTRINB* (32,"-") 
320 PRINT "LANGUAGE 1 M :GC(1) 
=4:PRINT"S0CIAL STUDY 2":BC(2>- 
5: PR INT "LITERATURE 3":BC(3>=5 
: PR I NT "MATH 4":BC(4>=5: 
PRI NT "SCIENCE 5":BC(5)*5:P 
R I NT " SPELL I NB 6":BC<6>~4: PR 

I NT "PENMANSHIP 7": BC(7>=1 : PRl 
NT" ART 8":BC(8)=1 
330 PRI NT " H YMNOLOB Y 9":BC(9) 
=l:PRINT"WGRD OF SOD 10 u :SC(10) 
=4: PRINT: INPUT" subject code";SC 
340 ONSC BOSUB2320, 2330,2340,235 
0,2360,2370,2380,2390,2400,2410 
350 CLS: PRI NTSTRINB* ( 32, " ?" ) ; : PR 
INT"??????????? HOW MANY ??????? 
????" ? : PRINTSTRINB* ( 32, " ?" ) : PRIN 
T" DAILY BRADES FOR: ";N«; l INPUTN 
360 PRINT8192, "TEST BRADES FOR: 
">N*? : INPUTM 

370 PRINT8256,STRINB*<32, "?" );:P 
R I NT "??????? BRADE WEIBHTINB ??? 
?????"{ : PRINTSTRINB* (32, "?" ) 
380 PRINTS384, "DAILY BRADES FOR: 
"?N*| : INPUTE 

390 PRINT144B, "TEST 8RADES FOR: 
"5N*? : INPUTR 

400 I FE+R< > 1 0THENCLB : PR I NT@1 28 , " 
THE TOTAL WEIBHT MUST EQUAL 10": 
FOR X - 1 TO 1 000 : NE X T X : BOTO370 
410 BV=BV+BC(SC> 
420 ST-0 

430 IFC*<TC,ST+1)»""THEN460 
440 ST«ST+l:BOTO430 
450 PRINTSTRING*(32,"=")i : PRINT 
460 CLS : PR I NT: PRINT" ENTER CUMUL- 
ATIVE DAILY GRADES": PRINT: SP*=" 

":QP*=" 
470 PRINTSTRING*(32, " = "> 
480 FORX- 1 TOST : W*-C* < TC , X ) : W*-W* 
+SP* : W*»LEFT* ( W* , 1 0 ) : I FX< 1 0THENP 
RINT" "|X;W*+" "S:INPUTA(8C,X>: 
NEXTX 

490 PRINTX$W*+" " ; : INPUTAC SC, X ) 
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:nextx 

500 CLS:F0RX«1T0ST;W»-C»<TC, X):W 
»=W»+QP»:W»«LEFT»<W»,7) : IFX<10TH 
ENPRINT" "|X|W$|A(SC,X) , : NEXTX 
510 PRINTX|W»JA(SC,X> , :NEXTX 
520 PRINT841B P "D0 YOU WISH TO CH 
ANSE ANY?":GOSUB2l0 
530 IFZ»="Y"THEN560 
540 IFZ»="N"THEN600 
550 IFZ«< > M Y H ORZ*< > " N M THEN520 
560 INPUT" ENTER THE STUDENT'S N 
UMBER M ;X 

570 IFX<10RX>ST THEN560 

580 INPUT "ENTER CORRECTED GRADE 

VALUE"!A(SC,X) 

590 8OTO500 

600 IFM=0THEN1390 

610 CLS: PR INT: PRINT" ENTER CUMUL 

ATI VE TEST GRADES" * PRINT 

620 PRINTSTRINS*<32, "=") 

630 FORX=lTOST:W*»C*<TC,X> :W»=W» 

+SP»:W»=LEFT»<W», 10) : IFX<10THENP 

RINT" ";x;w»+" »; :lNPUTB<sc,x>: 

NEXTX 

640 PRINTX!W»+" " » : INPUTB <SC, X ) 
: NEXTX 

650 CLS:FORX«lTOST:W»-C»(TC, X) :w 
»=W»+QP»: W»=LEFT» ( W* , 7 > : IFX< 10TH 
ENPRINT" "IX!W»;B<SC,X> , :NEXTX 
660 PRINTX; W*;B(SC, X) , : NEXTX 




It's like four games in one! Four entirely different screens provide 
hours of interesting entertainment! Battle spiders! Blast your way 
through the descending blocks! Defeat the enemy tanks! Trap the 
menacing cycles! increasing levels of difficulty make each a real 
challenge! KBQN is a fast ML program with mulll.eolors, Hi.R&s, and 
many great sounds, it displays the top five scores plus has a pause 
feature arw display mode. 

TAPE $26.95 

32K STANDARD-JOYSTICK DISK $28.95 



CATACOMB 

Avoid enerry patrols while getting fuel for your escape from ;he 
catacombs! Then dodge or blast space mines ar>g enemy shifts as 
you travel the hyperspace corridor seeking <he safety of your 
rnotherahip waiting a: the stargate! Calacornb is an original Hi- Res, 
multi-oolof. multl soreen, machine language program. 

TAPE $19.95 

16K STANDARD JOYSTICK ""v 5 * DISK $23.95 



PEEK COPY 
The copier with a difference 

• C»pies tape baaed software (even most autostarts) /$^\ 

« Displays memory in Hex and ASC11 

« Allows insertion or change of machine code 

■ Displays start, end, and execute addresses 01 ML programs 

« Is written in relocatable machine language c<y)m 

16K STANDARD TAPES11.85 

PLEASE ADD tt.OO EACH ORDER, POSTAGE/HANDLING 

OREGON COLOR COMPUTER 
P.O. BOX 11468, EUGENE, OR 97440 



670 PRlNTi4lB,"DO YOU WISH TO CH 

ANSE ANY?":SOSUB210 

6B0 IFZ»-"Y"THEN710 

690 IFZ»«"N"THEN750 

700 IFZ»O"Y"ORZ*O"N"THEN670 

710 INPUT" ENTER THE STUDENT'S N 

UMBER" i X 

720 IFX<0ORX>ST THEN 710 

730 INPUT"ENTER CORRECTED GRADE 

VALUE ";B<SC,X> 

740 GOTO650 

750 CLS 

760 F0RX=1T0ST 

770 F=< <<A<SC,X)/N>#E>+<<B<SC,X) 
/M)#R) ) /10 

780 PA(X)=PA(X)+F*GC(SC) 
790 F=INT(F+.5> 
B00 IFXY-BTHEN1340 
810 FA(SC,X)=F 

820 IFF=100THENQOSUB10B0:GOTOB50 
830 IFF>12THENF»«"F ":GOTOB50 
840 GOSUB2420 

B50 W»-C»<TC, X) :W»»W*+SP*:W*=LEF 
T*<W*, 10) 

B60 PRINT" "+W*;F», 
870 NEXTX 

880 I FQW«BTHEN 1 260 

B90 PRINT8420, "DO YOU WANT TO AV 

ERAGE " : PR I NT845B , " MORE GRADES " 

900 GOSUB210 

910 IFZ*="Y"THEN290 

920 I FZ $= " N " THENPR I NT " are 

you sure??"! : INPUT AS* 
930 AS»«LEFT*<AS», 1 ) : IFAS»»"Y"TH 
EN1200ELSE290 

940 IFZ»< >" Y"ORZ»< >"N" THENB90 

950 F$="A+": RETURN 

960 F*="A ": RETURN 

970 F*«"A-": RETURN 

980 F*= " B+ " : RETURN 

990 F$»"B ": RETURN 

1000 F*-"B-": RETURN 

1010 F$-»C+": RETURN 

1020 F$*"C ": RETURN 

1030 F»-"C- H : RETURN 

1040 F<= " D+ " : RETURN 

1050 F»»"D ": RETURN 

1060 F»«"D-": RETURN 

1070 F»«"F ": RETURN 

1080 F*-" ": RETURN 

1090 DIMC»<4,30) , A<10,30) ,B<10,3 

0) ,PA<30) ,SC(10) , FA (11, 30) 

1100 F0RX=1T01 

1110 FORY=0TO30 

1120 READC»<X,Y> 

1130 NEXTY, X 

1140 RETURN 

1 1 50 DATA " LUETKE " , M MI C HAEL " , " J I 
M", "SUSAN", "CHRIS" , "DAVID" , "BECK 
Y", "SHANNON", " BETTY" , "TINA", "WES 
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"KATHY", "HARMON", "MELYNDA" , "JE 
RRY", "REBECCA" , "ERICA", "BEN", "ME 
LAN IE", "MATTHEW", "MARTHA", "DEBOR 
AH", "KAREN", "BURT","", «%«»,« 

1160 DATA 
1170 DATA 
1180 DATA 
1190 DATA 
1200 CLS 

1210 PRINT" DO YOU WANT TO SE 
E THE 

1220 PRINT" OVERALL AVERAG 

ES ":GOSUB210 
1230 IFZ*="Y"THEN1300 
1240 IFZ** H N"THEN1260 
1230 IFZ*<> ,, Y"ORZ*O ,, N ,, THEN1210 
1260 PRINT: PRINT" DO YOU WANT 
TO SEE THE": PRINT" DECIMA 
L AVERAGES " : B0SUB2 10 
1270 IFZ*="Y"THEN1330 
1280 IFZ*»"N"THEN1420 
1 290 IFZ*< >" Y"ORZ*< >"N"THEN1260 
1300 QW»8:CLS: PRINT" OVER 

all averages" :forx=l tost 

1310 f=pa(X>/gv:fa(ii,x>=f:sc=0 

1320 GOTO790 

1330 CLS: PRINT" DECIMAL A 

VERAGES " : FORX=l TOST 



1340 Wt»C*(TC,X> :W*=W*+QP«:Wt«LE 
FT*<W«,?> 

1350 PRINT" "+W*»:PRINTUSING"##. 

##" ; pa < x ) /gv; : pri NT" " , 

1360 NEXTX 

1370 print:print:print h press any 
key to continue" 

1380 A*=INKEYf>: IFA*<>" "THEN1420E 
LSE1380 

1390 forx=itost:b<sc,x)=i:nextx 

1400 M= 1000000000 
1410 GOTO750 

1420 CLS:PRINT"ENTER ending date 
OF THE PRESENTGRADING PERIOD 

I MON-DA Y-YE AR 3 
"*;: INPUTVB* 

1430 CLS : PR I NT "IS THE PRINTER RE 

ady?":gosub210 

1440 ifz»o"y"then1430 

1450 CLS: PRINT" WOULD YOU 

LIKE A": PRINT" CLASS REPO 

RT CARD" 
1460 GOSUB210 

1470 IFZ*="Y"THEN1480£LSE1670 

1 480 PRINT#-2, CHR* 131 > ; TAB (5> "CL 

ASS REPORT ENDING C " » VB»J " 1 " : P 

RINT#-2,CHR*<30> 

1490 PRINT#-2,"" 

1500 GOSUB2150:FORX=1TOST 



MTS MARKET CHARTER 

MTS LOG 

MTS DATA NETWORK 




PROFESSIONAL LEVEL INVESTMENT TOOLS NOW AVAILABLE FOR THE 
COLOR COMPUTER. POWERFUL TECHNICAL ANALYSIS FUNCTIONS 
INCLUDING MULTIPLE VARIABLE MOVING AVERAGES, RATE OF CHANGE, 
OSCILLATORS, ETC. PLUS AUTOMATIC DAILY UPDATING OF PRICE AND 
VOLUME FILES VIAMODEM UTILIZING LOCAL AREA PHONE NUMBERS. 
SYSTEM COLOR COMPUTER 32K* 

REQUIREMENTS: 1 DISK DRIVE 

PRINTER (Optional) 
HAYES SMARTMODEM 
(Required For Auto Price Updating) 
PRICE: MTS MARKET CHARTER— $95.00 

MTS LOG & DATA NETWORK— $25.00 Per Month 
PRODUCT MANUAL— $25.00 If Purchased Separately 

MTS 

t Market Timing Software, Inc. 
6912 N. Sheridan Rd, 
Chicago, I L 60626 



Send Order Or Inquiry To: 



♦ALSO AVAILABLE FOR TRS 80 MOD III. II, 12 AND 16; IBM-PC. APPLE II PLUS. ETC. 
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1510 W«=C«(TC,X):W*=W«+SP*:W*-LE 
FT*(W*, 10) 

1520 PRINT#-2,W«;" "I 
1530 FORSC-1TO10 

1540 IFFA(SC,X)-100THENBOBUB10B0 
: 8OTO1560: ELSEIFFA (SC , X ) +1 >1 2THE 
NF»«"F ": SOTO 1560 

1350 ONFA(SC, X)+18OSUB950,960,97 

0, 980,990, 1000, 1010, 1020, 1030, 10 
40, 1050, 1060, 1070 

1560 PRINT#-2,F*+" "1 
1570 NEXTSC 

15B0 F-PA(X)/GV:F»INT(F+.S) 
1590 IFF-100THENGOSUB10B0:GOTO16 
1 0 : ELSE I FF > 1 2THENF*= "F " : GOTO 1 6 1 
0 

1600 GOSUB2420 

1610 PRINT#-2," "+F*+" "1 
1620 PRINT#-2,USING ,, ##.#*»*»"1FA(1 

1, X) 

1630 NEXTX 

1640 PRINT#-2, PRINT4*-2,"":PRI 

NT#-2, " " 

1650 CLS: PR I NT "WOULD YOU LIKE AN 

OTHER?" : GOSUB210 

1660 IFZ*="Y"THEN1480ELSE1670 

1670 CLS: PR I NT "WOULD YOU LIKE IN 

DIVIDUAL REPORT CARDS FOR ALL Y 

OUR STUDENTS " : GOSUB 2 1 0 

16B0 IFZ»="V"THEN1700 



FILE CABINET 

A SERIOUS UTILITY 

MULTIPURPOSE 
INFORMATION MANAGEMENT 

Maintain any file you create; inventory, 

investments, mailing lists, budgets, recipies, etc. 

Alphabetizes 

Sorts Numeric Entries 

Searches for key words or numbers 

Computes totals & averages by categories 

Saves Records, changes or deletes them, up to 

20 entries for each record, up to 

256 characters for each entry. 

preformated mailing list & recipie program included 

Output to Screen, Printer or Tape. 

PRINT all or selected records. 

,X,-j- Numeric Entries. 
Owners Manual included with sample files 
16K, 32K, Memory Expandable. ^% 
Extended Basic Required 
Moreton Bay s ?? B - 9 £ Postage paid 
(<Sr*<^%k MORETON BAY 

fi *ffiljfr#r SOFTWARE 

QB^^CS * DIVISION Or M0HKT9N BAY I.ABORATORY 

'^^^ZHE^^ 3 1 6 Cast' l!o Street 

^ — *^Hs ts ^ : *' Santa Barbara.. CA 93101 

Software (805} 962-3127 



1700 forx-itost:w«=c»(Tc,X):w«-w 

•+SP*:W«-LEFT«(W*, 10) 

1710 PRINT#-2,CHR»(30)|TAB<15)" 

REPORT FOR "J CHR* (31 ) ? W*|C 
HR* (30) 5 "ENDING C " 1 VB« I " 1 " Z PR I 
NT#-2, " " 
1720 8OSUB2150 

1730 W*«C«(TC,X):W*-W*+SP»:W*-LE 
FT»(W*,10) 

1740 PRINT#-2,W«; " «| 
1730 FORSC-1TO10 

1760 IFFA(SC, X)-100THENGOSUB10B0 
: GOTO1790 

1770 IFFA(SC,X)+1>12THENF*-"F »: 
GOTO1790 

17B0 ONFA(SC*X)+1GOSUB950,960,97 

0. 980. 990. 1000. 1010. 1020. 1030. 10 
40, 1050, 1060, 1070, 10B0 

1790 PRINT#-2,F*+" "1 
1800 NEXTSC 

1810 F-PA(X)/BV:F=INT(F+.5) 
1820 IFF>12THENF*-"F ":QOTO1B40 
1830 GOSUB2420 

1840 PRINT#-2," "+F*+" "1 
1850 PRINT#-2,USING"##.*»##"?FA(1 

1, X) 

1860 PRINT#-2, " ": PRINT#-2, " A+ 
-0 A=>1 A-=2 B+=3 B-4 B-*5 
C+«6 C-7 C-=B D+=? D-10 D— 
11 F=12":PRINT#-2, "":PRiNT#-2, " 
M :PRINT#-2, "" 
1870 NEXTX 

1880 CLS : PR I NT" WOULD VOU LIKE 
A REPORT CARD FOR A SPECIF 

IC STUDENT" : GOSUB210 

1890 ifz**"y"then1910 
1900 ifz«-"n"then2140 
1910 cls:forx-itost:w»-c*(TC,X): 

W*=W*+SP»: W«-LEFT* (W*, 10) : IFX<ST 

THENPRINT" "1 X|W», : NEXTX 
1920 PRINT: INPUT"PLEASE ENTER TH 
E STUDENT NUMBER" ; X 
1930 INPUT"PLEASE ENTER THE STUD 
ENT'S NAME" | XA# 

1940 PRINT4*-2,CHR»(30)|TAB(15)" 
REPORT FOR " ; CHR* (31) J XA*S " 
" } CHR* (30) * "ENDING C " ; VB»; 
PRINT#-2, " " 
1950 PRINT*- 2, "" 
1960 GOSUB 2 150 

1 970 W«-C« ( TC , X ) : W*»W*+SP» : W*«LE 
FT*(W*, 10) 

1980 PRINT#-2,W*i " "-, 
1990 FORSC=1TO10 

2000 IFFA(SC,X)=100THENSOSUB10B0 
: GOTO2020: ELSEIFFA (SC, X ) +1 M2THE 
NF«="F ":GOTO2020 

2010 ONFA(SC, X)+1GOSUB950,960,97 
0,980,990, 1000, 1010, 1020, 1030, 10 
40, 1050, 1060, 1070, 1080 
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2020 PRINT#-2,F»+" "I 
2030 NEXTSC 

2040 f-pa<x>/qv:f-int<f+.5> 

2050 IFF>12THENF*-"F »:QOTO2070 
2060 QOSUB2420 

2070 PRINT#-2," »+F»+" "J 
20S0 PRI NT#-2 , US I NQ "##,###"? FA (1 

1, X> 

2090 PRINT#-2, " » : PRINT#-2, ""i PRI 
NT#-2, " " 

2100 CL9: PR I NT "WOULD YOU LIKE AN 
OTHER?" : Q0SUB2 1 0 
2110 IFZ*=°Y"THEN1910 
2120 IFZt- M N"THEN2140 
2130 IFZ»O"Y"ORZ*<>"N"THEN2110 
2140 CL9: PR I NT "THANK YOU": END 
2150 PRINT#-2, "" 
2160 PRINT#-2, " N L 
9 L M 9 9 P A 
H W G D" 

2170 PRINT#-2," A A 

0 I A C P E R 
Y O RE" 

21S0 PRINT#-2, " M N 
C T T I E N T 
MR A C" 

2190 PRINT #-2," E 0 

1 E H E L M 
N D D I" 



Jkutioka 

49 BROOKLAND AVE 
AURORA, ONTARIO 
CANADA L4G 2H6 

FAMILY GAMES 

FOR 16K AND 32K COLOR COMPUTER 
STOCKBROKER - Up lo S players can play the stoc< 
market. For 16K or 32K ECB. The 32K ^s in Hign-Res 
Graphics. 

CRIBBAGE — Fmr 2 ar 4 players. In High-Res 
Graphics', (for 32K). 

BATTLE — Will you get fcomierj before you can find 
all the ships? An extremely entertaining §ame for the 
family. 

COLORMIND — Up to 4 players challenge for hidden- 
colors. 

REMREM— Challenge your friends. Who can remem 
rjer the longest color sequence? 
CONCEN Challen§e the computer or a friend to a 
gooi of game of concentration. 

ALL GAMES only 520.00 or ANY TWO for 535.00 
ALSO FROM JkulWHG So^tnitAe: 

MR. COPY — A quality copier written in M.L. that will 
make backup tape copies. MR. COPY is capable of 
making up to 99 copies in one loading! $25,00 
ROMDISK — if you have a mocitiec 32K C.C. machine 
ROVIDiSK win allow you to load your R.S. Rom Packs 
from a disk! $20.00 



2200 PRINT#-2," . U 
A R NLA 
O E M" 

2210 PRINT#-2, " . A 
LA. C I N 
L O A" 
2220 PRINT#-2," . 9 
T . E N 9 
OF A L" 

2230 PRINT#-2," . E 
9 U 9 H 

0 V" 
2240 PRINT#-2," 
T R . . . I 

Y 9 9 A M 

2250 PRINT#-2, " 

E . . . P 
O . V" 

2260 PRINT#-2 f " 



B" 



2270 PRINT#-2, " 



2290 PRINT#— 2| "" 
2290 RETURN 
2300 PCLEAR1 
2310 9OTO120 

2320 N»=" language"'. RETURN 
2330 N*- M social St.": RETURN 
2340 NS- " 1 i t»r«tur»" : RETURN 
2350 N*="math": RETURN 
2360 N*-"*ci«nc«": RETURN 
2370 N*="sp«l ling "'.RETURN 
2380 N**" penmansh i p " : RETURN 
2390 N*=" art": RETURN 
2400 N*«"hymnology": RETURN 
2410 N*="«ord of god": RETURN 
2420 ONF+1GOSUB950, 960, 970, 980,9 
90, 1000, 1010, 1020, 1030, 1040, 1050 
,1060, 1070 
2430 RETURN 





Mini . 



Speed Up Your CoCo 



Y«u can double the speed at which CoC« operates 
with a simple POK E statement, entered either directly 
from the keyboard or wit hina program The statement 
is POKE 654*5,0, This will speed up your CPU. You 
can return the computer to normal speed again by 
POKE 65494,0, 

N«te that you cannot perform any Input/ Output 
operations, such as saving the program to cassette, 
when the speedup is in effect. You may aiso lose tem- 
porary keyboard control. If this happens, a simple 
press of the RESET button will bring things back to 
normal, too, 



234 the RAINBOW September 1983 



By Dan Downard 
Rainbow Technical Editor 



^^hat do a kernel, tree, pipeline, path, shell and gobbler 

Nothing but OS-9. the new Radio Shack operating system 
for the new 64K CoCo. Sounds like a verse of Old MacDon- 
ald, doesn't it? Actually the new CoCo and the operating 
system are to be sold in separate, packages, but they go 
togetherto form one of the most dynamic innovations in the 
personal computer field to dale. 

Imagine yourself sitting in front of your CoCo running a 
program, or maybe playing a game, while a friend is access- 
ing files to his program through your RS-232 port. How 
about running Pascal, C and several other high level lan- 
guages' 7 All of this on a SI 99 computer? Well, to be realistic, 
we are talking in the neighborhood of $800. when you 
include the disk drive and all. Yes. you can have the most 
sophisticated microcomputer system available today for less 
than half the cost of a bare-hones Apple II. 

OS-9 is a multi-user, mulli-tasking. operating system 
developed for landy by Motorola and Microware lor the 
Color Computer. It is being marketed simultaneously with a 
new 64K Color Computer with a "real" keyboard and a few 
other minor changes. To sum the combination in a short 
phrase, I would say that Tandy i s "fa r ahead of any compel i- 
tor." No longer is the CoCo just for games and "a toy" (not 
that it ever was!) 



64K CoCo— A New keyboard 

By the time you arc reading this review the new 64K Color 
Computers should be on the dealers' shelves. We have been 
hearing rumors of new CoCo forsome time now and finally 
one has appeared. How much is new? Well, the keyboard for 
a start. As you can see the 64K CoCo and CoCo 2 have a 
typewriter-like keyboard with keys — that "travel." There is 
more to the keyboard than meets the eye. A full RF shield 
covers the bottom plane of the circuit board supporting the 
keys, li is grounded by means of a metal clip to the computer 
board. All keys are spill resistant and have a good "touch." I 
welcome this addition to the family. We understand that it 
will be available for $39.95 (plus installation) for upgrading 
existing CoCos. 

Other Changes 

The new computer is housed in a fawn-gray enclosure 
instead of battleship gray, but very similar lo the existing 
CoCo. Obviously a f>4K CoCo has to have 64 K chips. I 
wonder how many of you realize that if you have a "285" 
board with 32K chips you already have 64K. More than 
lhat, if you have the 1 .2 basic Hnd the I . I Extended basic- 
ROM you have the same thing inside your computer as the 
64K CoCo. I guess you could say it was a surprise when we 
discovered thai there had been no changes to the boards lor 
this revision. On the other hand, there have been a few minor 
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changes lo ihc ROMs. Following is a hrtel description of ihc 
changes. 

Addresses Change 

Extended BASIC 1.1 
Corrects bug with parse counter 
Changes "1,0" to "LI" 
Changes " if HO" to "I9K2~ 
Corrects bug in DLOAD 
Changes to RS-332 out 
Changes 10 PMOPF- 
Correcls 1 'CLEAR error 

BASIC 1 2 

Changes entry address of POLCAT 
New Baud constant 
Changes"! I "to "1.2" 
Changes "19X0" to "1982" 
Changes btaneh 10 POl.CAT 
Revised POLCAI routine 
Poll Pin 2 before printing 
Changes to INTCNV 
Correct bug in subtract routine 
The only change that should affect anyone is the different 
address of POI CAT. or the keyboard scan routine The new 
entry point is S ASCII instead ofSiAICI. I would not advise 
you to rush out and buy new ROMs as the present versions 
are compatible. There are cna nges to the DISK ROM in the 
works too. Since we did not have the new controller the only 
thingwckmswforsmeisihallheneu DiSK ROM will have 



Peek Inside The New 

64K C0C0. 

you realize that 1/1 uti ^ 
Iwve a'JSS'hoarti with 
.12 K dap.', xou alrrath 
have 64 K. Mare than 
thai, f'/'.t on have the IJ 
bask ami the I I 
Extended BASIC ROM 
vou base the same thing 
inside your euminner els 



■ating 



80D0-X0DD 

BOFF 

8112 

SCIB-8C51 
9I79-9I7D 
962C-962D 
96A.V96B3 

AtOI 

Al 14 
A 1 55 
AI5£ 
AIB6 

AICI-A26D 
A2C3-A2D5 
B3B-B426 



a DOS command for booting OS-9. 
OS* 

The real strength of the mew package lies in the oper 
system. Tandv. along with Motorola and Microwarc. 
adapted their UNIX baasd OS-9 system to the Color < 
putcr. In today's \ernacular I would term 
OS-9 is a multi-user, multi-tasking, iniertupt driven DOS 
with mulii level file structures 

Boy, that's a mouthful. By multi user, we mean literally 
that one person can operate C0C0 frum the keyboard while 
anothercan access the computer using the RS-2.12 port vh a 
remote terminal (which can he another C0C0). 

Using multi-tasking involves the processor performing 
two or more tasks simultaneously such as inputting to one 
file whilenutputunganotbertothe printer. Interrupt driven 
implies a real-time processing environment thai ts user 
friendly. In fact, OS-9 has a real-time cl»ck running contin- 
uously that will give you time with a keystroke. 

We will di ; ,euss multi-level I iles. but in essence the easiest 
way to understand it is to Yi.suaii/e a disk with more than one 
directory. With OS-9 you can have as many directories as 
you wan! and any directory can contain another sub- 
directory, or files. Tracing this hieraivhial structure is called 
a "path " 

As you can see, ihis system is a little more complex that 
Disk basic but don't iet that Marc you. As was mentioned 
earlier, this DOS opens a wealth of business, scientif ic and 
engineering software to IheCoCoalong with new high-level 
languages such as Cobol. Pascal, etc, 



the 6'iK CoCn. f pnesx 

UfU tfUtl! Ml' it HflW/ 

surprise when iu> diseo- 
vvred that there hod 
been tin changes to the 
lnuinix for thi > 
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Some of the more interesting features of OS-9 are the 
utilities provided with the package. Not only d o you get the 
operating system, but excellent text editor, assembler and 
debug programs. No high resolution screen is provided but 
upper- lowercase is fully functional for future upgrades. The 
printerd river supports varied formats and theentire system 
can be tailored for your needs. 

On the other hand BASIC is not supplied with the operat- 
ing systemand will be availa ble as a separate package as will 
other higher level programming languages. You can still use 
Disk BASIC on the same computer, but not with OS-9. 

The documentation is extensive, Four different manuals 
are provided. True to the CoCo tradition the first manual is 
named "Getting Started With OS-9. "An overview of system 
operation and startup procedures is given in a clear, concise 
format with several examples. Other documentation in- 
cludes a User's Manual and a Technical Manual along with 
a manual for the Editor, Assembler and Debugger. The 
latter manuals are similar to the Model I and III formats 
with considerably greater detail with regard to the operating 
system. I was amazed at the volume of documentation. 
Tandy probably has to cut down a whole tree for each set. 

Booting OS-9 

To run OS-9 you need a 64K CoCo with one disk drive. 
No newhardware is required for the new operating system. 
The system is supplied on twodisks. The firstdisk isformat- 
ted in Disk BASJC and contains two programs, a drive speed 
check (a real bonus!) and the OS-9 boot program. 

The speed check is very user friendly and recommended 
beforeattemptingtobopt OS-9, An error message appears if 
your d rives are not in tolerance, that is, between 2%,0 and 



303.5 RPM. You are requested to return the drive(s) to a 
service center for adjustment if they fail the test, Youcurcdo 
this yourself. Well have details next month. 

Booting the new system isn't very complex, Twodifferent 
methods are described, depending on the version of your 
DISK R#M. With Version 1 J, the boot disk is inserted and 
you type RUN"* ". You are prompted to insert the system 
master disk and that's it. With Versions 1 . 1 and later you just 
type DOS. You arc then greeted with the startup message; 
OS-9 LEVEL ONE 
RS VERSION 01.00.00 
COPYRIGHT 1980 BY MOTOROLA, INC. 
AND MICROWARE SYSTEMS CORP. 
REPRODUCED UNDER LICENSE 

TO TANDY CORP. 
ALL RIGHTS RESERVED 
YY/MM/DD HH:MM:SS 
You answer the prompts with the date and time and 
you're in business. The disks are not copy protected as you 
will have to make several baekups of the system disk if you 
are using a single d rive for your various files a nd d i rectories. 
Step-by-step instructions are given on making a backup and 
are easy to follow. Disks are in a different format than Disk 
BASIC and have to be formatted with OS-9 before the 
backup is made. 

The "Shell" 

The shell, or command processor, i s the heart of OS-9 chat 
interfaces the user to the •OS. Commands may be entered 
in upper or lower case but must be entered in a structured 
format, Commands maybe the name of a machine language 
program on disk or in memory, a program or a procedure 




P. O. Box 14806 
Jacksonville, FL 32238 
904 777-1543 

Prices on All games 
include shipping. Florida 
Resident add 5Vo tax. 
All Programs require Color 
Computer^ (Tandy C»cp) »r 
TDP System 100 ComPutef™ 
(RCA) 



WE CHALLENGE YOU! 

ACROSS THE RUBICON 16K EXT or NON EXT — The popular WWII 
wargame, Break thru the Huertgen Forrest using Infantry, tanks, 
paratroops, air and artillery strikes and destroy Hitler's plans for the Battle 
of the Bulge. CASSETTE. . ,$19.95. 

RUBICON II 32K EXT The wargamer's choice! Everything ATP, has and mor- 
tar units, patrols, German artillery, platoon movement, supply, intelligence, 
spotting rounds, unit merge, game save and much more! 
CASSETTE, , ,$24.95. 

GALACTIC TAIPAN32K EXT Battle storms, pirates and high taxes in hopes 
of making a profit In the galaxy. CASSETTE. , .$19.95, 
MISSION EMPIRE 32K EXT cass or disk. Starting with one planet. In- 
complete Intelligence and limited resources, you must form alliances, build 
armies and conquer the galaxy. Game save, Cass or Disk version on 
Cassette. . .$19.95. 

MISSION EMPIRE 18K EXT or NON EXT. With all of the above except ad- 
vanced play levels. CASSETTE. . .$19.95. 

BOMBER COMMAND 16K EXT The air war over Germany, 1941-45. Player 
must destroy German Industry while fighting off flak, the Luftwaffe and bad 
navigation. CASSETTE. . .$19.95. 

STARBLAZER 32K EXT During your absence, the SPECTRUM galaxy has 
been overrun by the draconic xyclons. Now you command the only Starship 
left to retaliate. CASSETTE . . . $19.95. 

MATH SKI-RACE 16K For elementary grades K-6. Remediation. Teacher sets 
parameters and students polish arithmetic skills a fun way. 
CASSETTE... $19.95. 

ROMPAC BACKUP 64K Can't run your ROMPACS with your disk In or just 
want backups? R.B. makes it easy. CASSETTE ONLY. , .$15.95, 
All games strategy oriented, graphically portrayed and guaranteed from 
defect and boredom, For DISK version add $3.00. No mail delays with per- 
sonal checks. State system with order. 
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file, A typical command would appear as: 
dir/Df /BUSINESS 

This particular command would list the contents of direc- 
tory BUSINESS in Drive 0. Commands are separated by 
spaces. Normally directories are uppercase and files lower- 
ease by convention. Modifiers for I/O are flagged by a /, 

Five different l/# devices are contained in the System 
Service Directory called by the SHELL. P is the printer, DO 
isdrivcO,TERMisthekeyboard/display, Dl isdrive 1 and 
Tl is a terminal connected to the RS-232 port. All input and 
output can be directed through any of these devices. 

To give you an example of the different levels of directo- 
ries, WQ, or drive 0, actually contains another directory 
called the Root Directory. This directory contains all of the 
commands in another directory called CMDS plus a file 
called startup. Startup is called each time the system is 
booted and normally contains user initialization for such 
thinp as printer Baud rate, terminal parameters, ete. 

One of the disappointments was the lack of a high resolu- 
tion screen. 1 don't think it will be long before one appears 
on the market, but Tandy already has tbem with other 
software and 1 can't understand why it wasn't implemented. 
At the same time, the screen is scroll protected every 161ines. 
No more holding the shift-@ key to see what you want 
before it disappears. Several keys have been redefined and 
all control characters are available. Theclear key is used as a 
"control" key for most operations. 

Other Features 

Sequential and random aceess files are supported by OS- 
9. Every file has attributes sueh as read, write and execution 



by the owner, or the public. Disk format, although different 
from Disk BASIC, maintains the same number of traeks and 
sectors on the disk with one important exception. OS-9 
a lloca tes disk space by "el usters," A clusterean be from one 
to any integral power of two (2, 4, 8, etc.). Qnesector of each 
disk is used as a bitmap indicating which clusters are in use. 

A technique called "timeslicing" allows all active pro- 
cesses to share CPU time. A reai-time clock interrupts the 
processor 60 times a second. The interruption points are 
called "ticks," At any tiek, the DOS can suspend execution 
of one program and begin another. Each process is assigned 
a priority from 0 to 255 with 0 being the highest. The shell 
has the highest priority due to I/O, etc. By this method, 
several programs cm be executed at the same time. 

What this means is that your CoCo now has a true time- 
sharing system — just like a mainframe! No kidding. This 
truly opens up a whole vista of possibilities in the micro- 
computer market. It constitutes a major innovation by 
Radio Shack. 

All programs for OS-tare written in position independ- 
ent eode, allowing advapced memory management. Pro- 
grams are loaded into memory only when needed but the 
user maintains the option of making them memory resident. 
Approximately 48K of user memory remainsaf ter the shell, 
drivers and screen memory. Programs are loaded into the 
top part of memory and data occupies the bottom part. Both 
are dynamically allocated and expand toward the center as 
required. Several programs can be in memory at once and 
even executed at once. Due to a combination of memory 
management and multi-tasking, multi-user programs are a 
reality. 




FILMASTR 

The Color Computer has a powerful ally in FILMASTR, This is a DATA 
MANAGEMENT SYSTEM that you can trust FILMASTR combines 
the best features of the big systems to provide * combination of 
speed, power, and ease of operation that can't be beat. 
YOU are in complete control of this friendly program with no program- 
ming knowledge required. You design the data screen with up to 20 
fields by moving the cursor on screen with the arrow keys and typing 
in the field names. FILMASTR takes care of 3d of the rest 
Enter data by just filling in the blanks. This form Fili-in is easy and 
natural to use. You can even copy data from the previous record with 
one key-stroke Add records, delete records, change records without 
fuss. 

Tell FILMASTR to sort your file mn any field that you want or to re- 
trieve a particular file and the (oh is done with super-human machine 
language speed. FILMASTR will find a Single file or a group of files that 
meet your request and will seve those records as a separate file if you 
want to. 

Controlled printing formats? Of course! Tell FILMASTR which records 
to use. which fields to print and in what order. You can control the 
print location to any position on the page. Maihng labels"^ You het! 
All commands are given to FILMASTR with single keystrokes. Press, 
the HELP key (BREAK), and the available commands are displayed. 
Make your choice from the menu and let FILMASTR do t h e wcrk 
FILMASTR can store up to 955 characters in each, record and up to 
24.000 characters ;n each tte (9000 with 16KI 

PILMABTR 1BK or 3ZK ~~ TAPE $29 95 

EXT BASIC DISK $34.95 

j^y AMDISK $39.95 

I bai'nbow Add S2.00 Postage & handling • CUM Additional 
PA Resfdents Add B°i: Tax 
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Commands 

A list of commands is given in Figure I with a short 
description of each. As you can see, most are standard disk 
commands you would find in other DOS's. Excellent d ocu- 
mentation provides information on the use of each com- 
mand with examples. I'm sure these commands will be 
explored in detail in future Hainbow articles. 

Editor, Assembler and Debug 

As OS-9 is machine language oriented, a cry of joy was 
detected at the sight of a standard disk-based Editor- 
Assembler for the Color Computer. Both have full MACRO 
capability, are user friendly and have excellent documenta- 
tion. Calls to the OS-9 system are made by the use of 
interrupts (SWI2) followed by a descriptor. All of the sys- 
tem calls are contained in a MACRO directory named 
DEFS. For this reason, an assembler is a necessity. The 
assembler accepts all of Motorola's directives and pseudo- 
operations and instructions are given in writing assembly 
language programs in an OS-9 format. 

The debug module is excellent. In addition to an expres- 
sion calculator, the program offers breakpoints, register 
examine and find commands among others. 

Summary 

As you can tell I am enthusiastic about the possibilities of 
OS-9. Excellent software is already available. Look in the 
ads this month. I'm sure Radio Shack will support this 
system especially in the areas of small business and engineer- 
ing, areas which up until now have been avoided. I like the 
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THE ULTIMATE STRATEGY GAME 



1 or 2 
players 



16K Ext. 

Baste 
required 



Cassette $ 19,95 Disk $24.95 

Send check or money order to: 
COCOHUT 

P. O. Box 24451 «3 
Houston, TX 77015 -H" 



idea of the DOS heing available to everyone along with the 
keyboard upgrade kit, Awesome! 

Command Summary 

Attr Change file attributes 

Backup Make disk backup 

Binex Convert binary to s-reeord 

Build Build text file 

Chd Change working data directory 

Chx Change working execution directory 

Cmp File comparison utility 

Cobbler Make bootstrap file 

Copy Copy data 

Date Display system date and time 

Deheck Check disk file structure 

Del Delete a file 

Deldir Delete all files in a directory system 

Dir Display filenames in a directory 

Display Display converted characters 

Dsave Generate procedure file to copy files 

Dump Formatted file dump 

Echo Echo text to output path 

Exbin Convert s-record to binary 

Format Initialize disk media 

Free Bisplay free space on device 

Ident Print %S 9 module identification 

Kill Abort a process 

Link Link module into memory 

List List contents of disk file 

Load Load module(s) into memory 

Login Timesharing system log-in 

Makdir Create directory file 

Mdir Display module directory 

Merge Copy and combine files 

Mfree Display free system RAM memory 

OS9Gen Build and link a bootstrap file 

Printerr Print full-text error messages 

Proes Display processes 

Pwd Print working directory 

Pxd Print execution directory 

Rename Change filename 

Save Save memory module(s) on a file 

Setime Activate and set system clock 

Setpr Set process priority 

Sleep Suspend process for period of time 

Shell OS-9 command interpreter 

Tee Copy standard input to multiple output paths 

Tm«de Change terminal operating mode 

Tsmon Timesharing monitor 

Unlink Unlink memory module 

Verify Verify or update module header and CRC 

Xmode Examine or change device initialization mode 



Automatic Lower Case 



To move automatically into lower case, type POAT282.0. 
To return to uppercase, use POKE 282,1. 

—Ken Ostrer 
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Software Review— IW\ 

Bibbits and Gribbits in 
Moptown Hotel 

Ever since the Moptown Hotel arrived for review, our 
family has "adopted" a number of strange but wonderful 
critters known as the moppets whieh inhabit Moptown. 
Moppets, which come in two kinds — Bibbits and Gribbits 
are a real way of teaching children (ages six-13) the concepts 
of similarities and differences. Moptown Hotel is part of a 
series of educational programs from the Follet Library 
Book Co. which includes Moptown Twin and Moptown 
Parade — all three packages are available on cassette or disk 
and require a 16K. Extended BASIC Color Computer, The 
disk version of Moptown Hotel is the subject of this review, 
which we decided to make a family review. Being an educa- 
tional package, what better way to review the program than 
to have our 1 1 -year-old program tester ( Chris) put the pack- 
age through its paces. 

The Moptown series starts with games involving simple 
comparisons including the recognition of common similari- 
ties or differences between moppets and progresses through 
various games leading to the M*ptmwn Hotel which devel- 
ops higher level problem solving concepts. Thus, Moptown 
Hotel is designed for the latter half of this age group. Those 
with children six to eight would do best with the first pro- 
grams mentioned earlier. 

Moptown Hotel consists of five separate activities. With 
the simplier activities, the child is presented withthetaskof 
analyzing differences and similarities hetween moppets 
using defined rules. Later activities require the child to 
determine the rule based on observations. All moppets can 
be described by four traits namely: height (short or tall), 
weight (thin or fat), color of clothes (blue or red), and type 
(Bibbit or Gribbit). The f iveactivities which range from easy 
to hard are; (I) Secret Pal; (2) Change Me; (3) Club House; 
(4) Moptown Map; (5) Moptown Hotel. Thef irsttwogames 
are done in low resolution graphics (semi-graphics mode) 
while the remaining games are in four-color, hi-res graphics. 
A brief description of each game f ollows; 

1. Change Me: This game requires the child to change 
moppet H I into moppet #4 by changing traits according 
to the rule, i.e., change either one or two traits at a time. 

2. Secret Pal: This game is similar to the popular game 
Mastermind. The child must guess the secret pal by 
naming its traits. The computer draws the moppet 



according to the specified traits and places one yellow 
mark for each correct trait but does not inform the child 
which traits are correct. Through a process of deduc- 
tion, the secret pal can be guessed. 

3. Clubhouses The idea of this game is to guess the mem- 
bership rule for which moppets can enter the clubhouse, 
e.g. only blue moppets. The child rescribes the traits of a 
moppet which he thinks belongs in the clubhouse. If the 
moppet meets the rule it is placed in the clubhouse; 
otherwise, an X is placed next to the moppet. By 
observing which moppetsenter the clubhouse, theehild 
soon determines theclubhouse rule. 

4. Moptown Map: In this game a neighborhood of Mop- 
town is drawn and the child must place moppets into 
their houses according to the neighborhood rules. For 
example, eaeh row or eolumn has a rule such as only 
short blue moppets in a row. Using the arrow keys the 
child placesmoppets in each house. By observing which 
moppets are correctly placed, the child soon learns the 
neighborhood rules. 

5. Moptown Hotel: In this final game moppets are assign- 
ed to hotel rooms according to floor and eolumn rules. 
To make it interesting, this activity is a game for two 
children. Each child earns "money" by placing the cor- 
rect moppet in a room next to occupied rooms. Before 
starting the game, the children may decide the hotel 
rules within the limits of one to three trait differences 
per row or column. 

All of the programs ran smoothly with no hitches. With 
the disk version, operation is controlled by a master menu. 
At any timecontrol can be returned to this menu by pressing 
the CLEAR key;however, in each case one can return to the 
program by answering "no" to the prompt tocontinue. This 
prevents accidentally cancelling the program by hitting the 
CLEAR key. Instructions are provided in each program at 
the beginning and also when the "?" is pressed. This, of 
course, avoids the need to refer to the manual. It should also 
be noted that very little typig ability is required of the child. 
Other than typing his/ her name, only one key responses are 
required by the child, e.g., S or T for short or tall. 

From our discussion thus f ar it is obvious that the Mop- 
town series is designed to teach the concepts of deductive 
reasoning. Deductive skills are enf orced by using the conerete 
example of the moppet to deduce an abstract rule. The use of 
the moppet characters rather than abstract geometric 
shapes, for example, makes the process of learning so much 
more fun. Children can identify with the moppets in houses 
or clubhouses or hotels, etc. much more easily than trying to 
distiguish between abstract shapes. 

The d ocumentation is sufficient since the instructions arc 
included in each program as noted above. However, there 
might have been more d iscussion for parents on the concepts 
of logical thinking. This would help parents to provide 
guidance to their children. For example, the manual sug- 
gests making a deck of moppet cards with some possible 
games. This is an excellent idea which allows the learning 
process to continue while mom and dad use the CoCo to 
blow up space nasties. Overall we rate the Moptown Series 
as excellent — you can tell your child you're buying a game 
and he/she will never know it's really an educational game. 

(Moptown Hmtelhy Follett Library Btrt Cm., 4506 North- 
west Highway, Crystal Lake, !L 600X4, tape S30, diik S35) 

-Pal, »on, and Chris Bollberg 
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Software RevlewZ 



Beyond Words 
Is Beyond Words 

Beyond Words consists of three separate language arts 
tutors from Computer Island written for children and young 
adults, grades three through 12. After CLOADing this 32K 
Extended BASIC program, the usermust ENTER PC LEA R 
1 before proceeding to RUN. At this p»int the student is 
asked to enter his/ her name and tell if the printer is turned, 
•n. The child then chooses one of three subtests, Each is a 
three-part, menu-driven program and the user can practice 
•nc skill and then go on toanothet at the end ofa round. The 
incorrect questions and answers are displayed, and if the 
printei is turned on, a list of items to study is generated. If a 
particular subtest is used for five rounds, a total seore is 
given. 

Beyond Words 1,2 and 3 are written for children in grades 
three to five, grades six to eight, and grades nine to 12 
respectively. All have spelling subtests in which a correct 
and an ineorrect spelling of a word is given. The child then 
types in and ENTERs the word that he thinks is spelled 
correctly. Fourth graders who tested it really liked the idea 
of having to type in a word, rather than keying tn the number 
of the answer. That age groups seems to enjoy a program 
that allows them to use the computer as much as possible. 

A second subtest in each program deals with antonyms 
and synonyms. In this part, two words are shown. The child 
has to decide if the meaning of the wordsare the same (S) or 
opposite (O). 

It is the third subtest that is different in each program. In 
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presents 



The BEST »Trek' game e^erlll 
rNTRUDER ALERT I 
Can YOU outsmart the 3obcts??? 



Both games with multiple levels, and 
Realtime, Past Action lovres graphics! 
Each for only $16.95 



— The BEST in Adventures — 
** THE KECRtLOOUE TRILOGY ** 
A Three program Adventure 1 1 1 

All Three 16k programs 

for only $17-95 
THE QUEST FOR THE STAFF OF LLORIHAR 
*** Book I Parts 1&2 *•** ~ 
Both parts (p lfik programs) for 13.95 
(Parts 3&!+ coming soon I) 

All prices include P. & H„ MY State 
residents please add app. sales tax, 
HYPERION SOFTWARE 
P.O. Box 196 
Lagrange ville. NY 125^0 



Beyond Words I, it is short forms, This subtest covers 
abbreviations and contractions. The long form is given and 
dashes are shown to indicate the length of the answer. The 
child is then to type in the short form. In Beyond Words 2, 
there is a subtest in homonyms. A word is given, and again 
dashes indicate the length of the answer. The child has to 
type in a word that sounds exactly like the given one. 

Beyond Words I's third subtest is analogies. Tw» pairs of 
words are given and the user has to decide if the relationship 
of the first pair is the same as the relationship of the second 
pair. In other words, is the analogy true (T) or false (F)? 

Ail three programs have 40f questions each. The ques- 
tions are randomly selected and in our testing, we found 
hardly any repeats with each loading. 

The words used in the program are all contained in 
DATA statements. The documentation suggests that the 
program ears be modified by the user and gives very com- 
plete directions «n how to change the DATA statements so 
the program's use really becomes inf inite. The modification 
directions arc clearly written and very easy to follow. 

We had mxiny children »f all different ages use the pro- 
gram that was suited to their particular age group. The 
reactions and comments about the programs were all very 
favorable. All «f Ihe children, especially the younger ones, 
enjoyed the amount of interaction that they had with the 
computer. My daughter, Shari, who is in the eighth grade, 
found the subtests for her level very challenging. Very often 
she complains that "educational" software written for her 
age group is too easy. 

(Computer Island, 227 Hampton Green. Staten Island, NY 

11312, tape S19.95 each) 

—Stephanie Snyder 



POWER LINE PROBLEMS? 




SPKE-SPKR® ...THE SOLUTION! 



Protects, orgoniles, controls computers & sensitive, high tech electronic 
Helps (Nipvem software "glitches", wwtpfarad memery lorn, 
ond equipment domoge. Absofbs demogi'119 voltoge spikes & surges, re- 
duce costly equipment downtime, filtef models attenuate conducted 
Rf ifltwferonce. 120V, 15 Amps. Other models ovailoble, Ajk for free 
literature for detailed specs. Coll your order in todoyl 

DELUXE POWER •DHSOLE 
$79.95 

Tronsient absorber, dual 5-staoe filter. 8 individually 
switched sockets, fused, moin switch, orsd lite. 

OUAD-ll $59.95 

Transient obsorber. Dual 3-stoge flttar. 4 sotkers, lite. 

OUAD-i $49.95 

Transient obsorber, 4 sockets, lite. 

MINI. II $44.95 

Tronstent obsorber, 3-5toge fitter, 2 sockets, lite. 

MINI I $34.95 

Tronsient obsorber, 2 sockets, lite. 



'i 



nasi®* 

6584 ftuchRd., Dept.RB 



215-837-0700 

Oul of sloie. »ider toll free 
PA 18017 800 523-9685 «TWX 510-651 2101 
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Software Review' 



Phonics I: Teaching Tool 
With Limitations 



Phonics I is an attempt to use the computer, combined 
with a voice track on tape, to teach the initial consonant 
blend sounds of words. The tape version, which I received 
for review, consists of two tapes, one a tutorial, the other a 
test, The computer is used to synchronize the playing of the 
cassette recorder with the screen display. 1 presume the disk 
version is similar. 

In the tutorial, a pleasant male voice first pronounces the 
blend and asks you to repeat it after him, while the letters 
which make the sound are shown on the screen in large lower 
case. The voice says, for example, "Blue starts with b1."This 
is repeated fur 22 separate blends. 

Due tm the sequential nature of such a presentation it is 
impossible to isolate only a few sounds for study at any given 
lime, nor can the order be changed. This severely restricts 
Ihe usefulness of the tutorial as a teaching tool, as the usual 
practice is to first master a few sounds and then proceed to 
new material. 

The student might be better served in the initial learning 
stage by a simple voice tape combined with an illustrated 
booklet showing the letters, and a few words in which the 
blend occurs. Such tapes are easy to prepare, and most 
children are familiar with the use of a beep tone to indicate 
that the page is to be turned. Only after the child is familiar 



"See" Music!! 



•Tlit KALEIDOPHONf allows your Color Computer to "Bite* to" 

your hi-fi and display wfcot it ' heart" on your TVI 
•Datfrcofed Wdwor* hit the computer do trot* foH-time 
to creating the dtspkrva, so oreaffl-tokiitg, tmimaM pie- 
teres in fell color or* eosr to program. 

♦Just plug the KALEIDOPHOHE into hi-fi and feyitkk inputs. 
•Do not confuse with imitation — the KAtE fDOPHOfif 
continuously denVers octoai return* wand* [64 h*eit in 
stereo). Works on any CoCo { t 6K recommended J, 

KALEIDOPHOHICS, our users' newsletter {FREE with purchaee) 

contains dozens of new display ideas in each issue - o literally 

infinite variety of patterns is passible) 

•The XAMOQPHONt 1$ tomething ready new. Great for 
partiesf educational toot Order Now! 

•Only M9.95 fully assembled including detailed instructions. 

BONUS: free issue of KALEIDOPHOHICS on cassettes 



NEW SALEM RESEARCH 
West Main Street 
New Salem, Mots. 01355 
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with most of the blends used in this program would the 
computer tutorial be helpful for review ai|d reinforcement. 
Some children do have great difficulty associating spoken 
sounds with the printed word, and for them it is helpful to 
have a variety of audio visual methods available. The 
excitement of using the computer for this type of task may 
provide that extra boost to learning needed. 

The testing program is very similar to the tutorial pro- 
gram. The tape voiee first explains that the child is to wait 
for the appearance of a large question mark un the screen 
before answering. Then the tape vuice says, for example, 
"What are the first two letters in the word black?" (All words 
used arc different from those used in the tutorial portion.) 

When the question mark appears, the child is to key in his 
response. That, f orthe young child, is easier said than done. 
It takes the inexperienced child a very long time to find the 
correet two letters Unfortunately, he is deprived of the thrill 
of seeing his work on the sereen, for what he keys in is not 
displayed. No provision is made for him to correct his 
answer in case he hits the wrong key, or hits two adjacent 
keys simultaneously. If he dues succeed , he is rewarded with 
a happy faee, and if his response is incorrect a sad face is 
shown and a low tone sounds. 

The children who tried the program for me were disap- 
pointed that they could not see what they had typed in, but 
were very happy when they were correct. After the appear- 
ance of one of the two faces, the correct two letters are 
shown. The non-punitive nature of computer testing and 
drill programs does encourage repetition until success is 
achieved, but here, where the same words and the same 
order must be followed, a child whu works with it many 
times may memorize the order of responses, rather than 
learn the material. 

The limitations inherent in this type of program suit it 
best, in my opinion, to the child who has already learned 
most of the blends presented, but who needs an extra push. 
At the present time, when using a computer is, for many, 
rewarding in itself, this program may help. Although the 
documentation accompanying (he program asserts that it is 
designed to tutor children in basic reading skills, it might 
have application in the teaching of spoken English to the 
foreign born,furwhom letter recognition and typingare less 
problematical. 

(Prickly-Pear Software, 9822 E. Stella Road, Tucson, AZ 

85701, S24.95) 

— Cerol Kueppers 



Print Out Disk Directory 



If you have a long disk directory and want to see all 
of it, or if you simply wish to have a hard-copy print- 
out of your directory, one simple command will allow 
you to do this easily, 

Just POKE I I !,254:DIR and the entiredisk direc- 
tory will appear on yourprinter, even it if is too long to 
be fully d isplayed on the screen. 
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Software Review- 



VDOS 

The Case Of The Hidden Disk 

By Frank J. Esser 



T TTXWstands f or"A Virtual Disk Operating System." 
IX The word virtual means that an item takes on an 
V appearance of something other than what it really is. 
The term "virtual memory" has been used to describe the 
manner in which some of the large mainframe computers 
handle memory mapping. However, as the 16-bit profes- 
sional computers become more sophisticated, the term will 
start to be applied to them also. In the case of the large 
mainframes, the term virtual memory referred to the fact 
that the programmer had available to him more memory in 
which to run his program than was apparent. In the case of a 
couple o f vendors, h i s program, i n essence, could beas large 
as the disk that stored them and still run. To the pro- 
grammer it appeared as if he had all the memory he could 
ever wish for. Howdoesthatapply to VDOS, youask? Well, 



V(~3^ WORLD'S 
* ' SMARTEST TERMINAL! 



EASY TO USE 

ON-THE-SCREEN EDITING via cursor Full prompting. 
Scrolling. Key Beep & Error Beebop. 

PLEASANTLY POWERFUL 

Total communications ability at 110 lo 1200 baud. 
Transmit text, graphics, BASIC and Machine Language. 
Save & Load cassette/disk files while on line. Scan/Edit 
current data while receiving more data. Use any modem. 
Fully supports D. C. Hayes & others. Use any printer, 
page size, margins, line spacing. Override narrow text 
width of received data. Imbed printer controls. 

TRULY AUTOMATIC 

Automate almost any communicalions activity. Dial via 
modem, sign-on, interract, sign-off. Perform an entire 
session. Act as a message taker. Keystroke Multipliers 
may include parameter changes, editing, lime delays, 
execution of other multipliers, looping, waiting for 
partially specified responses, and branching based 
upon alternative responses. Self-test mode. 

32K MEMORY RECOMMENDED "••':?** 
CASSETTE $39.95 DISKETTE (coming soon) $49.95 

Add $3 Shipping & Handling 
MC/VISA/COD 

PXE Computing Ew». & weekends: 214/899-7273 

11 Vlcktburg Lane Weekdays: MICRO CONCEPTS 

mcfierdfon. TJt 75080 214/4S6-03M 



VDOS provides the user with a virtual disk system. VDOS 
will take half of user memory for the disk system data 
storage. This means that in a 32 or I6K system, you will 
loose half of the available memory to the system. However, 
if you have a 64K system, VDOS will take the 32K of 
memory under the ROMs and use it. Thus the user will only 
loose the 2K needed to hold the VDOS system itself. 1 f you 
already have a disk drive, VDOS can be used as a supple- 
ment to it and is completely compatible with it. 

VDOS comes on a cassette tape and is autoloading, That 
is, you are required to only type in CLOADM anii wait. 
KDOS requires a 16K, 32K or64K computer anda cassette 
recorder. Extended BASIC is not require d. The documenta- 
tion consists of 16 pages of single-sided, typewritten mate- 
rial. The manual is well-written and easy to follow. It took 
me approximately five minutes to get VDOS up and run- 
ning. The first section of the manual is devoted to explaining 
just what VDOS is and what it will do in very general terms. 
The second section is the introduction. It is devoted to giving 
the user a more in-depth description of VDOS. The third 
section is a tutorial on the use of VDOS and will walk the 
user through all its functions. There is an appendix which 
contains the necessary information which explains how to 
f orce VDOS l# reserve more than half the available memory 
if one so wishes. Also included is the manner in which 
VDOS can be disconnected if and when the user wishes todo 
so. The last section is a quick reference section listing the 
VDOS commands and how to use them. 

Placing the cassette in the recorder, typing CLOAM and 
waiting will produce the start-up message for VDOS, The 
message is: 

VDOS 1 .# COPYRIGHT (C) 1983 BY 

»R. PREBLE'S PROGRAMS 
TYPE V DOS (ENTER) FOR MENU 

EN» OF USER MEMORY=32642 
Typing VDOS ENTER gets the main menu which has the 
following format: 
VDOS Menu 

1) DIRECTORY 

2) SAVE BASIC PROGRAM 

3) LOAD BASIC PROGRAM 

4) SAVE BINARY FILE 

5) LOAD BINARY FILE 

•) KILL A BASIC PROGRAM 

7) KILL A BINARY FILE 

8) EXITTO BASIC 

Let us examine each of these commands individually. The 
DIRECTORY command works much like Radio Shack's 
disk BASIC command DIR. Exercising this option will dis- 
play the programs already cata loged (stored) on the memory 
disk system. The printout has the following format: 
VDOS DIRECTORY 



TYPE NAME SIZE LOA» EXEC 

BAS: CCCALC 7261 

30407 BYTES REMAIN FOR STORAGE 

PRESS ANY KEY TO CONTINUE 

The load and size categories are for machine language 
programs. 
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The SAVE BASIC PROGRAM option will store your 
BASIC programs in the system. The program must first be 
loaded into regular memory either f rom tape or disk. It can 
be RUN or just loaded, it doesn't really matter. When you 
are ready to save the program, type VDOS and press 
ENTER. VDOS's main menu will appear, wherein you 
select option 2. You are then asked f orthe filename you wish 
to use. Upon pressing ENTER, the return is almost instan- 
taneous. In f act, the return is so f ast that you may tend to 
think it did not work, but it did. Welcome to the world of 
bulk storage. Upon listing the directory contents, you will 
indeed see that your program has been cataloged. 

The LOAD BASIC PROGRAM is just the opposite of 
the previous command. This option will fetch your program 
from the VDOS storage area and put it in the user memory 
area, ready to run. The response here is just as fast as the 
previous command. 

SAVE BINARY FILE and LOAD BINARY FILE are 
the same as their BASIC counterparts, except that you must 
use the proper load procedures to get them into regular 
memory from either disk or cassette. 

KILL A BASIC PROGRAM willdojust that. If there isa 
BASIC program cataloged on the system, using this option 
will allow you to delete it. 

KILL A BINARY FILE is the same as the above com- 
mand except that it is used for binary files. 

EXIT TO BASIC allows the user to return to the basic 
interpreter and proceed as if VDOS does not exist. 

VDOS is a 2K virtual disk operating system which will 
make maximum use of your computer's memory. Although 
VDOS will work with any system, and I think there are 




YOUR SEARCH IS OVER 



The Software Connection of 

Ft. Lauderdale is your one stop 
source for your Color Computer 
Software and Peripherals. 



WE FEATURE A COMPLETE SELECTION 
OF SOFTWARE FROM MOST SUPPLIERS 
AT DISCOUNTED PRICES! 



TOP (Tandy) 
COLOR COMPUTER 

18K Regular Basic 

*195 



TDP (Tandy) 
COLOR COMPUTER 

1SK Exvmded Basic 

*295 



84K UPGRADES {E/F boards) $85 • (D boards w/1,1 rom) $85 

( — SECS BOX (Serial Electronic Communication Switch) — , 

: Switch from printer to modem or Other device without I 
! removing packsfrom your computer 

| With three outlets and pilot light to $QQ QE% : 

i confirm transmission. %JS7«S7J \ 



Repairs done on all color computers at reasonable prtcea 

When in Ft. Lauderdale be sure to visit our retail store. 




THE SOFTWARE 
i CQIMECMMC. 

3 5460 Mo. State Rd. 7. Suite i08 

mimf Foit Lauderdale, (under the Loft Restaurant) 
(305) 464-7547 



many, many applications for the 16K and 32K systems, it 
really shines on a 64K system. VDOS will put to work that 
hidden 32K of memory that lies under the ROMs. The 
memory that just sits there doing nothing in most cases. 
VDOS has a command set which will allow you to load and 
save programs, delete both BASIC and binary programs and 
list the directory. There is a last command which will return 
the user to the basic interpreter; it remains invisible until 
you type the command VDOS. All basic functions perform 
as before. VDOS runs completely independently. It can be 
exited and reentered at will. 1 1 is not removed f rom memory 
until you remove it. Which is also a very simple procedure. 
There is no interaction between it and RS basic, VDOS is 
an excellent addition to any Color Computer library. It 
allows the user to store a number of programs in high 
memory, to be recalled and used at anytime the user wishes. 
1 have three disk drives on line and use my system for many 
business applications. Most of these applications I wrote 
myself and I sure wish that VDOS had been available when 1 
was developing and debugging them. It would have saved 
me countless hours of program swapping time. I see tre- 
mendous use for this system if properly applied. If yours isa 
cassette-based system and you have a number of programs 
stored on the tape you are working on, you know what a 
problem the management of those programs can be. Well, 
VDOS can take care of that for you. You can load the 
programs one at a time into regular memory and catalog 
them under VDOS. Repeat this procedure as many times as 
needed, provided there is sufficient memory available. 
When you have finished, simply reload them to memory 
from VDOS and resave back to tape. What could be easier? 
If you already have a disk system, VDOS will save the time 
required to load from disk since VDOS's response is almost 
instantaneous. In either case, there are some very definite 
advantages to using VDOS. Couple this with the fact that in 
a 64K machine it runs almost completely out of your way. 
You will give up only 2K of user memory to it. 

In conclusion, 1 f ound VDOS t o b e a program of excellent 
quality and with tremendous potential. The author of 
VDOS promises that a set of utilities to expand its capabili- 
ties will be available in the near future. I have a couple of 
items which 1 would like to throw into the pot of future 
utilities. It would be nice if you could load and run a pro- 
gram under VDOS from another program, as can be done 
with RS Disk BASIC. Also, it would be neat if you could go 
directly from V DOS to tape or disk on a singular program 
basis. And perhaps a later version would be able to address 
one of the computer ports for greater storage capabilities, 
VDOS has limited storage, but with a little care, it should do 
the job very well. After all, 32K of programs is quite a bit. I 
believe that this program should be in the library of every 
serious CoCo user, whether you have a cassette or disk- 
based system. 



(An accompanying utility, VDUMP, is now available 
from the author and will alfow you to load or save an 
entire hank of programs with * single command.) 



(Dr, Preble's Programs, 6540 Outer L««p, Louisville, KY 
40228, S49.95 plus $1.50 s/h) 
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Gathering information for a term paper? Preparing a report or lecture? 

Let Bibliography File Help With 
That Term Paper! 



By Larry Konecky 

Students and teachers, here is a data program written spccifi 
cally with some of your needs in mind. Bibliography 
information and related notes can be stored on disk 
for quick access and recall. Information is filed similar to 
a .1 x 5 index card record keeping system. Each 
record contains fields for entering a subject, tag, 
author, title, publication, volume or address, 
date, page numbers, and nine lines of notes. 
The subject, lag, and author fields are 
stored in a sequential file in alphabetical 
order by subject and by author within 
each subject. All other fields ate 
handled through direct access filing. 

Included are a variety of formats 
for accessing, displaying, and print- 
ing information contained in your file. 
Records may be accessed by sub- 
ject, lag, or author, or any com- 
bination of the three. Records 
may also be accessed by specific 
title. Typing the word "ALL" in 
place of a specific title, subject, 
tag, or author will allow tabbing 
through all records under specific 
fields or combination of fields. 
Records displayed can be sent to 
a printer in one of two formats 
(bibliography information only 
or the complete record). 

A listing mode provides var- 
ious formats for listing accessible 
fields contained in your file. Sub- 
ject field headings can be dis- 
played or printed along with a 




252 the RAINBOW September 1983 



number indicating the number of records filed under each 
subject, Tags, authors, or titles under specific subjects; or 
tags, authors, or titles for all subjects may be listed. Tagand 
author modes allow selection of either screen or printer for 
listing while titles can be sent only to a printer. Another 
listing mode will list to a printer a combination of all subject, 
tag, and author fields. 

This program is written for a 32K Color Computer with 
disk drive. It will not work as written with cassette as direct 
access filing is used to handle data. To make full use of the 
program a printer is necessary. (1 use a Line Printer Vll.) 

A PCLEAR 1 is used to sctaside RAM for program use. 
Iri the first RUN after your system is turned on this state- 
ment often causes errors. To alleviate these problems per- 
form a PCLEAR 1 before your first RUN. 

After RUN is entered the following "initial" menu will 
appear: 

1) Continue Existing File 

2) Begin New File (Disk) 

If you are beginning a new disk, select 2, If you already have 
a file created on the disk in your drive, select 1. If you select 2 
and then save a record to disk on a disk already containing 
records you wili lose access to those records. Only select 2 if 
you are beginninga new file on a fresh disk or no longer have 
a need tor records presently on a disk. You may want to 
create separate files (disks) for various subject areas if you 
expect a large collection of records. There is room for 140 
records on each disk. It is helpful to have a copy of the 
program on each disk being used for a file. 

After choosing to continue with an existing file the follow- 
ing "main" menu will appear: 

1) ADD 

2) SEARCH 

3) LIST 

4) END 

(If you had selected to begin a new disk from the initial 
menu, you would automatically have been placed in the 
ADD mode.) 

ADD allows addition of new records to your file and 
consists of four pages for entering information; one page for 
entering bibliography information and three for entering 
iiotes. The first page seen allows entering the following 
bibliography information by passing indicated keys: 



Key 


Bib Inf. 


Length 


S 


Subject 


15 


T 


Tag 


12 


A 


Author 


30 


1 


Title 


80 


2 


Title continued 


80 


P 


Publication or Publisher 


30 


V 


Volume or Address 


30 


D 


Date 


12 


G 


Page Numbers 


15 



Each field is limited to a specified amount of characters as 
shown iri the right hand column above. 

N»tes are entered through each of the other three pages. 
Up to nine lines of 75 characters each may be used. Each line 
is entered by accessing its corresponding page and selecting 
a line number from one through nine (three to a page). 

Belowcach page appears a menu of other selectable func- 
tions as shown below: 

'^-CONTINUE 'E* DELETE ie=SAVE 

'R -RETURN 'L-PR1NT 'B - BACK 



Selecting between Cand B allows movement between each 
of the four pages. If you press C on the fourth page you will 
beasked if you want tosave the presentrecord to disk. Press 
Y to save and then return to the main menu. N will return 
operation to the main menu without saving the current 
record to disk. Pressing R on any page will initiate this same 
action, Press K to save the current record to disk, from any 
pageand then return to the main menu. Any timea record is 
saved, it is first alphabetized by subject and by author within 
each subject, The subject, tag, and author fields are stored in 
a sequential file al»ng with an assigned number. This 
number is used lor direct access filing of the remaining 
fields. Pressing L al lows selection of one of two formats f»r 
printing rccords(bibliography only or the complete record). 
Pressing E in the ADD mode will return operation to the 
main menu without saving the current record to disk. 

The above functions work somewhat differently in the 
SEARCH mode. Instead of returning to the main menu 
when completed a check is made f«r further records under 
the current field heading(s) beingsearched and any records 
found will be displayed, If no records remain under the 
selected field headinc(s) you will then be returned to the 
main menu. If you press E while in the SEARCH mode the 
record being displayed will be erased from your disk file. 

SEARCH allows accessing records already contained 
within a file, These records may be displayed on the screen as 
in the AD* mode or sent to a printer. The records may be 
accessed individually or by various groupings, The follow- 
ing menu appears in SEARCH mode: 

1) Subject-Tag- Author 

2) Title 

3) Return to Main Menu 

If I issclected,eight ways of searchingarepossible. You will 
be prompted to enter a specific subject , Lag, and author one 
at a time. The word "ALL" may be entered if all records 
under particular fields iire desired . The following combina- 
tions arc possible: 



Subject 


Tag 


Author 


ALL 


ALL 


ALL 


(entry) 


ALL 


ALL 


ALL 


(entry) 


ALL 


ALL 


ALL 


(entry) 


(entry) 


(entry) 


ALL 


(entry) 


ALL 


(entry) 


ALL 


(entry) 


(entry) 


(entry) 


(entry) 


(entry) 



If no records are found under specific entries you will be 
returned to the main menu. 

If you have selected the screen lor displaying of records 
and more than one record is contained under a specific entry 
you will be able to page through these records one at a time. 
Once a complete record is paged through and ieft for 
another, you can page back to it by pressing B. 

If sent to a printer all records under specific fields selected 
will be printed within one of the two possible formats (bibli- 
ography or complete). If more than one record is filed under 
specific fields, they will be printed continuously until no 
more are found. When printing more than one record, lines 
are counted and paper is automatically advanced so that 
records do not cross over perforations. It is a good idea to set 
the paper so that printing begins at the top of a sheet. If 
records are chosen oneat a time for printing this automatic 
advance will not occur. 
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» HARMON YCS ^— 

lb. 66*1573 



SALT LAKE CITY, UTAH 84110 




Arcade games putting your kids in a talfspln? 
HARMONYCS educational software ends the 
arcade game dizzys. 



* EDUCATIONAL • 



T1C-TAC-TOE MATH. Plenty ot color and sound Different 
age players can compete against each other with their 
own skill level. 16k Extended Basic $11.95 

PRE-SCHOOL PAK. Alphabet recognition arid counting 
drills. Hi-res graphics and sound 

16K Extended Basic . $8.95 



• HOME & PERSONAL 

DISK MONEY MINDER. A home budget tool. Allows print- 
out of category balances. Up to 56 user defined cate- 
gories. Helps you watch those dollars and cenls. 

32K and Disk Basic . . $19.95 

MONEY MINDER II. Cassette tape version of our popular 
DISK MONEY MINDER 

16K Color Bas<C . . . . $14.95 
PlE-CHART. Lefs you SEE your "slice of the pie." Charts 
nearly any aata set you car. imagine 

16K Extended Basic . . $10.95 
AMORTIZATION. This is the most complete, most versatile 
amortization program available tor the CoCo. 

16K Extended Basic . $11 95 
COLORHYTHM. Feeling down? Check your biorhythms 
with this excellent hi-res program. 

16K Extended Basic . . $9.95 
Old certificates available. W* pay shipping on all orders. 
We ship next day... period! 



HARMONYCS 

T6 HM t5?i 

■ALT LAKE CITY, UTAN Ml yd 



You may select specific titles to search for, or "ALL" 
titles, When selectinga specific titleyou need type inonly the 
first 32 characters. If a title is less than 32 characters you will 
need to press the space bar enough times to use up a total of 
32 characters for a proper search. 

When in SEARCH mode and displaying records t« the 
screen, if you have made no changes to records being dis- 
played you need not resave them to disk. If editing has taken 
place and you want changes set on disk, press K to save, or Y 
when asked. 

Selecting LIST from the main menu will display the fol- 
lowing menu: 

1) Subjects 

2) Tags 

3) Authors 

4) Stibjeets-Tags-Authors 

5) Titles 

6) Return 

Press I to list all subject headings in alphabetical order and 
also the number of records contained under each. This list 
may be sent to either screen or printer. Selecting 2 or 3 will 
list tags or authors by subject, A specific subject may be 
selected or "ALL" may be selected. Again either screen or 
printermaybeused.Modes4and5 willbesent to the printer 
only. Pressing 4 will list to a printer all subjects, tags, and 
authors in alphabetical order by subject and by author 
within each subject. Titles may be listed by specific subject 
heading or all of them may be listed by typing "ALL"f«rthe 
subject entry. Titles will be listed in the same sequential 
order as in the other listing modes. 

Editing is accomplished through either ADD or SEARCH 
modes. It works in the same manner as entering informa 
tion. Once you have selected a field to edit and the curs»r 
appears on the screen in that particular field you are com- 
mitted. If you have made a mistake and selected an incorrect 
field you will need to retype that field. Just pressing ENTER 
without retyping will erase any previous entry from RAM. 
Correcting a character error in any one field necessitates 
retyping that particular field and then rcsaving the record to 
disk. 

Whencompletinga session 1 suggest you END bygoingto 
the main menu and pressing 4. This will insure that all files 
are properly closed. You will find that BREAK is disabled in 
certain parts of the program to encourage use of the END 
routine. 

( Larry Konecky holds a master's degree in guitar per- 
formance and is working on a Doctor of Musk Educa- 
tion degree. He is currently Director ofCAl In Music 
at Alcorn State University.) 



2&C 0236 

330 041A 

625 06F8 

1010 09DO 

1405 0C29 

1590 0F4E 

1830 _ 11DE 

2081 1532 

222S _ 1803 



3165 , 1A97 

3355 _1D4C 

4020 1FD2 

4110 22B9 

5120 25E8 

5305 28C7 

5410 _ 2B3A 
5690 — 2DFG 
END 3039 



The listing: 

1 IF PEEK<&H7EB9> <> &H32 THEN C 
LEAR 200,!<H7EB0:FORI=!<HB2B9 TO !< 
H831E:POKEI-S<H400,PEEK(I):NEXT E 
LSE5 

2 FOR I =0TO2: POKES? H7EBD+ 1, 18. 'NEXT 
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: I=&H7F1E 

3 POKE I, &H26: POKE 1+1, 3: POKE I +2, fc 
H7E : POKE I +3 , &H83 : POKE 1+4, &H22: PO 
KEI+5,8«H7E 

4 P0KEI+6,&HA4:P0KEI+7,&H4C 

5 P0KE&H19B,&H7E:RUN6 

6 PCLEAR1 : CLEARS000: FILES6, 1 000 
10 DIM S*(140) ,T*(140> ,A*(140) ,R 
(140) 

200 R*=CHR* ( 255 ) : BC*=STR I NG* (32, 
159) ;SX»=STRINGS(80, "-") 
210 SCS=STRINSS(64, 1 9 1 > : SG*=STRI 
NG*(32, "-'•) 

220 '* 

221 '* OPEN BUFFERS 

222 '* 

235 OPEN"D",#l, "TITLE/DAT", 160 
240 FIELD#1,80AST1*,80AST2S 
245 OPEN"D", #2, "PUB/DAT 87 
250 FIELD#2,30ASPS,30ASV*, 15ASGS 
, 12ASDS 

255 OPEN"D", #3, " I NFOl /DAT " , 225 
260 FIELD#3,75ASI1*,75ASI2*,75AS 
13* 

265 OPEN"D" , #4, " I NF02/DAT" , 225 

270 FIELD#4, 75ASI4S, 75ASI5*,75AS 
16* 

271 OPEN"D" , #5, " I NF03/DAT" , 225 

272 FIELD#5,75ASI7*,75ASI8»,75A8 
19* 



275 LSETT1*= ,,I, ;LSETT2** M " 

280 LSETP*- ■ " : LSET Kf*=" " Z L5ETGS=" 

"ZLSETDS-" " 

285 LSETI 1 *=" " : LSETI 2*-" " : LSETI3 
S »" " : LSETI 4*=" " : LSET I 5*= LSETI 

6*= " " 

286 LSET I 7**"»: LSET I 8*- LSETI 9 

*=" " 

300 CLS3 

305 PRINTQ6, " *B I BL I OGR APH Y FILE 

* " ; 

310 PRINT@66," SELECT FROM THE F 
OLLOWING 

315 PRINT@162," 1> CONTINUE EXIS 
TING FILE 

320 PRINT<&194, " 2) BEGIN NEW FIL 
E (DISK) "J 

325 I*=INKEY*: IFIS=" "THEN325 

326 IFI*="1"THEN400 

327 IFI*="2"THENMS=l:GOTO605 
330 GOTO310 

400 OPEN " I " , #6 , " SUB AUTH " : X = 1 

405 INPUT #6,S*(X> 

406 INPUT #6,TS(X) 

407 INPUT #6 t AS(X) 

408 INPUT #6,R<X) 

409 IF E0F(6)=-1THEN415 

410 X=X+l:GOTO405 
415 CLOSE#6 

500 D«0:C-0:CLS3:PRINT$6, " *BIBL 




/ 



JFD - COCO DISC SYSTEM - $449 



JAM Systems. I id is a leader in the Model III 
marketplace with our JFO III Disc Controller. With 
thousands in operation, we have sot now standards 
in controller performance and reliability. We bring 
these same high standards to the COCO, resulting 
in the highest quality disc cunhulltjt system w> the 
market Camnare these functions hotnre you buy 

■ Price. includes controller, first drive, disc 
basic in ROM. am} manuals. Just plug it in. 

• Ni!vcr needs adjust, nq Om exclusive Uigrtal 
Phase Lock loop Oala Separator and Digital Pre 

/ comp Circuil eliminates the 3 adjustments tourfd 
on other cor>lro!l«rs. / 

• High Quality standard production disc drives. For 
improved service and reliability. Tandon & Tear. — 
drives provide twice the read sensitivity that the 
drives found in other disc systems do, and hold 
their alignment far longer. 

» Guld-ptated card edge connectors throughout 

• Software compatible with Rndfo Shack Disc 
Basic. Flex, and OS/9. / 

J & M Systems, Lid., 137 Utah NE. Albuquerque, N.M. 87108 
(505) 265-1501 j 




J&M SYSTEMS, LTD. 



September 1983 the RAINBOW 255 



IOGRAPHY FILE* " ; 

501 LSETT1*="":LSETT2S="" 

502 LSETP*=" " : LSETV*=" " : LSETG*=" 

,, :lsetds=" " 

503 LSETI 1 S= " " : LSETI 2*=" " : LSETI 3 
*= M " I LSETI 4*=" " : LSET I 5*«" " : LSET I 
6*= 

504 LSETI7*= ,, ":LSETI8*="":LSETI9 
%=" •» : s*»" " : T$=" »• : A*=» •■ 

505 PRINTS66, " SELECT FROM THE F 
OLLOWINB " ; :L=0 

510 PRINT@168," 1> ADD "", 
515 PRINT8200, " 2) SEARCH "; 

520 PRINT@232,*' 3) LIST "; 

521 PRINT@264," 4) END "I 

522 I *= I NKEY* : I F I *= " " THEN522 

525 IFI*="1"THEN MS=1:GOTO600 

526 IFI*="2"THEN MS=2: SOTO3000 

527 I Ft ♦="3" THEN NS=3: GOTO5000 

528 IFI*="4"THEN NS=4: GOTO2400 

529 6OTO505 

600 IFS*(X)="ZZZ"THEN700 

605 X=X+l:W=X: IFX=1THENR(1)=1 

610 IFX<141THEN700 

615 PRINT@352,SC*; : PRI NT8384, SC* 

5 : 

620 PRINT@393," FILE FULL "5 : X=X 

-1 

625 G0T0522 



CASSETTE CONTROLLER 

s you to hear your cassettes without 
unplugging cables. Switch knob between 
3 manual positions *2b" 

SERIAL SWITCHER 




TOTALLY SOLDERLESS KITS 

4k - i#c 9 ao« 

16K • 32K 'iS™ 

All memoiy upgrades come complete with 16K or 32K burton, 
easy-to-follow instructions, end 90-«iay unconditioned w«rr*n'y. 
MLOT U©HT— Includes 5 different colored lenses, and 
simple instructions. Mounts in 5 minutes to top cover ol your 
computer. With Liletime Warranty, only '7°* 

I.C.s CABLES 

6809E CPU *25°° Direct Coax 1o TV-3". 6'. 9\ IT. . MO" 

4S83SAM .... '25°° <Seri«IMIoM «7" 

*M7VDG '20°° Serial M to M. coiled • 5' ... - ..'7°* 

4821 Pf A *B» ' Serial Ext. M to F "7" 

FullSet '65 00 -COSS Ext MlOf •7"» 

Cass. Ext , coiled . 5' . «7 M 

★ FREE ★ 'Joystick Ext. M to f «7«° 

"Frices shown ore lor 6 feet. 
CATALOGUE Extra lenglh, «dd 5Q< per fl. 

Terms: Cashiers checks and money orders (or immediate 
delivery » Personal checks allow 2 w#«tts « #rders under S2S 
oddS2 shipping * C.O.O, odd S2 • Caljform 
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697 '* 

698 * * PAGES 

699 '* 

700 cls2:print@0,bc*;:print@8," 
*bi bl iography* " ; : forbg=32to380s 

TEP32:PRINT@BG,STRING*C32, 143); : 
NEXT 

705 PRINT832, "S> "S*? 
710 PRINT@49, " CT) "T*; 
715 PRINT864, "A) "A*; 

720 PRINTQ96, "1) "Tl*; 

721 PRINT@178,R*; 

725 PRINT6192, "2> "T2$» 

726 PRINT@274,R*; 
730 PRINT82S8, "P> "P«; 
735 PRINT6320, "V) "V*J 
740 PRINT@352, "D) "D*; 
745 PRINT@366, " (G) "G*; 

750 PRINTG416, C* =CONTINUE 'E*- 
DELETE ~K'=SAVE" 

755 PRINT@448, "'R'=RETURN >L' = 

PRINT ' B* =BACK" ; 

760 I*=INKEY*: IFI*«" "THEN760 

765 IFI*="S"THEN1200 

770 IFI*="T"THEN1220 

775 IFI*="A"THEN1240 

780 IFI*="1"THEN1260 

785 IF I*= "2" THEN 1280 

790 IFI*="P"THEN1300 

795 IFI*="V"THEN1320 

800 IFI*="G"THEN1360 

805 IFI*»"D"THEN1340 

810 IFI*="C"THEN1400 

815 IFI*="E M THEN1100 

820 IFI*="K"THEN2000 

825 IFI*="R"THEN2200 

830 IFI*«'*L"THEN1900 

831 IFI*="8"THEN1000 
835 BOTO760 

1000 IFMS=1THEN760 

1005 IFMS=2 AND V=l THEN760ELSEY= 

Y~2:GOTD3350 
1010 GOTO760 

Hf50 PF?INT@416,SC«; : PRINT@418," 
DELETE! ARE YOU SURE? "; 
1105 PRINT@450," ( Y OR N ) 
1110 Q*=INKEY*: IFQ#= ,S "THEN11 10 
1115 IFQ*="N"THEN700 
1120 IFQ*="Y"THEN2200ELSE1 100 
1200 PRINT@34, | iLINEINPUTNIirSliM- 
EFT^N*,, 15) :C=i 

1205 IFT*=""THENPRINT@49, " (T) ";E 
LSEPRINT@49, " <T) "+T*I 
1210 GOTO760 

1220 PRINT@52, ; rLINEINPUTN*: T*=L 
EFT*<N*, 12) 
1230 G1TO760 

1240 PRINT@66,; : L I NEINPUTN*: AS=L 
EFT* (N*, 30) !C=1 
1250 GOTO760 
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1260 PRINTQ9B, ; :lineinputn»:lset 
T1»"N« 

1270 PRINT0178, R»; :GOTO760 

1280 PRINTS174, ; :lineinputn«:lse 

TT2«=N» 

1270 PRINT@274,R«; : GOTO760 

1 300 PR I NTS290 , ; : L I NE I NPUTN* : LSE 

TP«=N« 

1310 GOTO760 

1320 PRINT0322, ; :LINEINPUTN«:LSE 

TV««N« 

1330 GOTO760 

1340 PRINT0354, ? : LINEINPUTN*: LSE 
TD»=N« 

1345 PRINT0366, " (G) "G*; 
1350 GOTO760 

1360 PRINT0369, ; :lineinputn«:lse 

TG«=N« 

1370 GOTO760 

1400 ci_S6:print@0,sc*; 

1405 PRINT@2,S*;:PRINT@17,T»;:PR 
INT@34,A«; :print@64,sg«; 

1410 PRINT076, "1)"I1»; 

1411 PRINT@t73,R«; 

1415 PRINTS172, "2) "12*; 

1416 PRINT@267,R«; 

1420 PRINTS2BB, "3) "I3»; 

1421 PRINT@365,R«; 




9UPSET 

ABOUT POOR 
VIDEO QUALITY? 

We ear* fix it I 




ASSEMBLED LOWER CASE MODULE $69.95 
Easy to install - No software changes 
■Adds lower case with true descenders. 
BOARD ONLY $12,00 




TV Buff 
will give standard NT5C 
vtdeo output f or virtually 
any monitor $ 9.9S 



tmnd Sr. CO tor our 
complete cat 4 tog 



da* ten call (212) 499 -5400 



WORLD ELECTRONICS 

177 27th Street 

Brooklyn, N.Y. 11232 



1425 PRINTQ4 16, "'C "CONTINUE ' E' 
-DELETE 'K'^SAVE" 

1430 PRINTS448, "'R* -RETURN ' L' 

=PRINT ' B* -BACK" ; 

1435 I*"INKEY»: IFI*-" "THEN1435 

1440 IFI«»" 1"THEN1600 

1445 IFI»-"2"THEN1610 

1450 IFI««*'3 ,, THENi620 

1455 IFI«""C"THEN1500 

1460 IFI««"E"THEN1100 

1465 IFI»-"K"THEN2000 

1470 IFI«-"R ,, THEN2200 

1475 IFI«="L"THEN1700 

1485 IFI««"B"THEN700 

1470 GOTO 1435 

1500 cls6:print@0,sc»; 

1505 print@2,s»; :print@17,t»; :pr 

int@34,a»; :print@64,sg«; 

1510 PRINT076, "4) "I4«; 

1511 PRINT@173,R»; 

1515 PR INTO 172, "5) "15*; 

1516 PRINT@267,R»; 

1520 PRINTS288, "6) "16*; 

1521 PRINT@365,R*; 

1525 PRINTS416, '"' C* =CONTI NUE 'E* 
"DELETE 'K'"SAVE" 

1530 PRINTS448, *" R ' "RETURN *L' 

"PRINT * B* =BACK" ; 

1535 I*=*INKEV»: IF I*^"'" THEN 1535 

1540 IFI«="4"THEN1630 

1545 IFI»="5"THEN1640 

1550 IFI*»"6"THEN1650 

1555 IFI*="C M THEN1B00 

1560 IFI»="E"THEN1100 

1565 IFI*="K" THEN 2000 

1570 IFI»="R"THEN2200 

1580 IFI*-"L"THEN1700 

1585 IFI»="B"THEN1400 

1570 GOTO 1535 

1600 PRINTS78, ; :LINEINPUTN«:LSET 
I 1*=N» 

1605 PRINT@173,R»; IG0T01435 
1610 PRINTS174, ; : LI NEINPUTN*: LSE 
TI2»=N» 

1615 PRINT@267,R«; IG0T01435 
1620 PRINTS290, ; :lineinputn«:lse 
TI3«=N* 

1625 PRINT@365,R«; :G0T01435 
1630 PRINTS7B, ; : LI NE I NPUTN*: LSET 
I4»=N* 

1635 PRINT@173,R«; IG0T01535 
1640 PR I NTS 1 74, ; : LI NE I NPUTN*: LSE 
TI5*=N» 

1645 PRINT@267,R»; :G0T01535 
1650 PRINT@270, ; :LINEINPUTN*:LSE 
TI6»=N» 

1655 PRINT@365,R»; :60T01535 

1 660 PR I NT678, ; : L I NE I NPUTN* : LSET 

I 7«=N« 

1665 PRINT@173,R«I :G0T01835 
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1670 PRINT8194, | :LINEINPUTN#:LSE 
TIG*=N» 

1675 PRINT8269,R*? :S0T01B35 
16B0 PRINT9290, i :LINEINPUTN«:LSE 
TI9*=N» 

16B5 PRINT8365,R«1 SB0T01B35 

1B00 CLS6:PRINT90,BC»5 

1B05 PRINT82,S*?:PRINTei9,T«»:PR 

INT@34,A»; :PRINT@64,SB»| 

1B10 PRINTS96, "7> " I7*J 

1B11 PRINTei73,R»$ 

1B15 PRINT8192, "8> "I8«| 

1B16 PRINTe269,R»$ 

1B20 PRINT82BB, "9) "19*; 

1B21 PRINTG365, R»; 

1B25 PRINT@416, ,,? C"=C0NTINUE 'E* 

-DELETE *K'=SAVE" 

1830 PRINT844B, "*R* -RETURN "L' 

-PRINT *B*=BACK"J 

1B35 I«=INKEY»: IFI«=" "THEN1835 

1B40 IFI«="7"THEN1660 

1B45 IFI«="B"THEN1670 

1B50 IFI»="9"THEN16B0 

1B55 IFI«»"C"THEN2200 

I860 IFI»="E"THEN1100 

1B65 IFI*»"K"THEN2000 

1B70 IFI«-"R"THEN2200 

1B75 IFI»="L ,, THEN1900 




MMBTOfflf CHE' - IBY ALAN ROUSE! EFFICIENT, EASY TO S: 
E INVENTORY PROGRAMS SHALL BUSINESS, HOMES, CLUBS. % 
irTTNVUO RECQSSS 1AK, 148 32K, PRINTS INVENTOR* STATUS AND §: 
** 1 ™%QR0ER RIPORTS. BE RIGHT! 16-32K EXT TAPE 120.00 £ 
• 6RAPH ONE' - COLOR SCREEN BARGRAPHS IN SECONDS. MAKE 

BUSINESS PLANS CDHE ALIVE. 1A-32K EXT TAPE I 8.00 K 
gtB-BMF' -PRINT BAR6RAPHS, EPSON OR OKIDATA PRINTER, '? 
"~. NO SCREEN PRINT PROGRAM NEEDED. PRODI " 
p^fTpHOTOREADY GRAPHS, MODIFIABLE. 8-32K EXT TAPE 112.50 1: 
% ""' FILE ONE' - SHALL DATABASE PROGRAM FOR FILES, RECIPES, J 
* AIMS9E9. PRINTS HAIL LABELS, I6-32K EXT TAPE 112.50 1 
% ' mii m< m ' " FUM » EDUCATION, HO BAKES. USEFUL AT:| 
•3 HOME, BUSINESS. SHW FRIENDS. 16-32K EXT TAPE 112.50 \ 
£ ' IDOTHINK' - DO COMPUTERS THINK? 3 PROGRAMS HILL RAKE \ 
$ VOU HONDER, PONDER, SUESS, 16-32K EXT TAPE $12.50 ;i 
'j ^SPANISH QME" - NORDS, PHRASES, SPANISH OR ENGLISH, HAS§ 
jiW^SQlJNDIKG BUIDES FOR SPEAKING. 16-32K EXT TAPE I S.< " 
$r*a' ^«<ISH TWO* - MORE ADVANCED. 16-32K EXT TAPE t B.OOg 
% ' MOttitOR ONE' - SMALL MONITOR. 16-52K EXT TAPE I A. 00:* 

& for education, pre-school. 14-32K ext tape, each i 6.00 8 

"LETTERS ONE" - ALPHABET WITH COLORS AND SOUND CUES. % 
- NUMBER LEARNING (1-12). AS ABOVE. % 



INCLUDES POSTAGE COSTS, IF VIRGINIA, ADD 41 SALES TAX. % 



1B80 IFI«-"B M THEN1500 
1B85 0OTO1835 

1900 PRlNT8416,SC«i :PRINT841B f " ( 
B) IBLIOBRAPHY OR ( C > OMPLETE " t 
1910 I«=INKEY»: IFI«* M,, THEN1910 
1920 IFI««"B"THENP=i:BOTO4025 
1 930 I F I »= " C M THENP=2: BOTO4025 
1940 BOTO1910 

1990 '* 

1991 '* ALPHABETIZE AND SAVE 

1992 '* 

2000 PRINTe416,SC»;: IFHS=1THEN20 
20 

2005 IFMS=2 ANDC=1THEN2100 

2010 IFHS=2AND O0THENT* ( Y> =T«: Z 

=Y: GOTO2060 

2020 IFS« ( X > ■ " Z Z Z H THENWW=R ( X > ELS 
EWW-X 

2021 IFX=1THENZ=1:6OTO2045 
2025 FORZ=X TD1STEP-1 
2030 IFZ=1THEN2045 

2035 IFS«<8«(Z-1)THENS«(Z>-S»(Z- 

i>:t«(Z>=t«(z-i> :a*(Z>=a«(z-i> :r 
(z>=r(z-1> :nextz 

2040 ifs«=s«(z~1> anda«<a*(z-1>th 
ens» ( z ) =s» ( z -1 > : t« ( z > =t« ( z - 1 ) : a» 
<z>=a«(z-i>:r(Z)=R(z-i>:nextz 
2045 s«(z)=s«:t*(z>=t«: a«(z>=a» 
2050 ifms=1thenr<z>=ww elser ( z) — 

W 

2060 PUT#1»R(Z) 
2065 PUT#2,R(Z> 
2070 PUT#3,R(Z> 

2075 PUT#4,R(Z> 

2076 PUT#5,R(Z> 

20B0 OPEN " □ " , #6 , " SUBAUTH" 

2081 F0RZ=1T0X 

2082 WRITE#6,S*(Z) 
20B3 WRITE#6,T«(Z> 
20B4 WRITE tt6,A«(Z> 
2085 WRITE#6,R(Z) 
20B6 NEXTZ 

20B7 CLOSE #6 

20B9 IFD=1THEND=0: Y=Y-1 

2090 IFMS-2 AND I»= ,, R"THEN500 

2092 IFMS=2THEN3350ELSE500 

2100 W=R(Y) 

2105 FORV=Y TD(X-l) 

2110 s«<v>=s«<v+i> :t«<v>=t«<v+i> 
:a»(V>=a»(V+i>:r(V>=r(V+i> 

2120 NEXTV 

2121 IFI*= M K"THEN2020 

2122 IFU«="C" OR I«="R">AND □»= 
" Y " THEN2020 

2124 S»(V>■"ZZZ ,, :T«(V>=- , ': A«(V) = 
"ZZZ ,, :R(V>=W 

2 1 26 LSETP»=" ■ : LSETV»=" - : LSET6*» 
" " : LSETD*™" " : LSETT1 »=" ■ : LSETT2»» 

2 1 27 LSET 11*="": LSET I 2««" " : LSET I 
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3«« M " : LSETI4*-" " : LSET I 5«« LSET 

16*=" » : LSETI7«- LSET I B««" " : LSE 

TI9*« ,,M 

2129 IFD=1THEN2080 

2130 6OTO2020 

2200 IFMS=2 AND I " E " THEND= 1 : GO 
TO2100 

2205 IFMS=1 AND I*="E"THEN X-X-l 
: GOTO500 

2210 PRINT@416,SC»J :PRINT@418, " 
DO VDU WISH TO SAVE THIS »j:PRI 
NT@450," RECORD? (Y OR N> " ; 
2215 Q*=INKEV*: IFQ*«=" "THEN2215 

2220 IFQ*-"N" AND MS=2 AND I* = "C 
"THEN 3350 

2221 IFQ«="N" AND MS=2 AND I*="R 
" THEN500 

2225 IFQ*»"N" AND MS=1 THENX=X-1 
: BOTO500 
2230 IFQ»»"Y" 
2235 IFQ*= ,, Y" 
2250 B0TD2215 
2400 CLOSE 
2410 END 
3000 CLS4 

3005 PRINTQ5," *B I BL I OGRAPHY SEA 
RCH* "J 

3010 PRINTQ66, " SELECT FROM THE 



AND MS=1 THEN2000 
AND MS=2THEN 2100 



FOLLOWING "J 

3015 PRINT9163, " 1) SUBJECT— TAG- 
AUTHOR " ; 

3020 PRINTQ195," 2) TITLE 

3025 PRINTQ227," 3) RETURN TO HA 
IN MENU "; 

3030 I*-INKEY«: IFI»-" "THEN3030 

3031 IFI*»"1 ,, THEN3100 

3032 IFI*="2"THEN3400 

3033 IFI*="3"THEN500 
3035 GOTO3010 

3100 CLS4 

3105 PRINTQ5, "*BIBLIOGRAPHY SEAR 

ch* "; 

3110 printq64, "* input subject: " 

; 

3115 PRINTQ96," " » : L I NE I NPUTSE* 
3120 PRINT8160, "*INPUT TAG: "; 
3125 PRINT9192," " » : LINEINPUTTE 
* 

3130 PRINTQ256, "* INPUT AUTHOR: " 

; 

3135 PRINT@200," "J! LI NE INPUT AE 
* 

3140 PRINTK356, " (S)CREEN OR (P) 
RINT? 

3150 I*=INKEY*: IFI*-""THEN3150 



1 SHUGART or TEAC 
YEAR WARRANTY 




40 TRK SS/DD 
w/ RS DISK CONTROLLER 
DOS MANUAL Included! 

* RADIO SHACK/ TANDY * EPSON * OKI DATA * 

* TRANSTAR * MANNESMAN-TALLY * STARKITS * 

* TOM MIX * MARK DATA * BMC * AMDEK * NEC * 

* BOTEK * MSI * SHROUT SW * NELSON SW * 

* M0RET0N BAY * DERRINGER SW * DATASOFT * 

* CUSTOM SW ENGRG * SOUTHERN SW SYSTEMS* 

* TAXAN * PRICKLY PEAR * SPECTRAL * ANTECO •■ 

* COMPUTERWARE * EIGEN SYSTEMS * C0L0RS0FT ■■ 

* BERTAMAX * COGNITEC * DRESSELHAUS * 
EMERALD COMPUTER SERVICES 

4401 219th SW 

MOUNTLAKE TERRACE, WASH. 98043 

206-778-9826 



* RADIO SHACK COLOR COMPUTERS * 

16K COLOR BASIC $ 179 
16K EXTENDED COLOR BASIC $269 
■32/64K EXTENDED COLOR BASIC $369 



MASTERCARD/VISA WELCOME 
FOREIGN ORDERS WELCOME! 

NEW 5 DAY SHIPPING 
SCHEDULES (IF STOCKED) 



** FACTORY AUTHORIZED PRINTER 
REPAIR- EPSON, OKIDATA, TRANSTAR 

*** TEAC Thinline 40 TRK DRIVES 
*** TANDON DS/DD 40 TRK DRIVES 

***COMPOSITE VIDEO CIRCUIT 
***MEMORY UPGRADES D-E-F BOARDS 



ALSO PRESENTING: 

MORROW OE5IGN5 [~J 
MICRO DECISION 
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3135 IFI*«"S"THENA«2:GOTO3190 
3160 IFI«- ,, P"THENA-l:QOTO3170 
3165 6OTO3150 

3170 PRINTQ353, "(B) IBLIOGRAPHY D 
R ( C ) OMPLETE?" I 

3175 I*»INKEY*: IFI*"" "THEN3175 
3177 IFI*» H B"THENP=l:G0T03185 
3180 IFI*»"C"THENP=2ELSE3175 
3185 PRINTQ352,SC*; : PRINTQ3S8, " 
**♦ PRINTING *** "i 

3190 IFSE^'ALL" AND TE*-"ALL" A 
ND AE*="ALL" THEN3200 

3191 IFSE*«"ALL" AND TE*-"ALL H T 
HEN3320 

3192 IFSE*="ALL" AND AE*=«"ALL" T 
HEN3300 

3193 IFTE*="ALL" AND AE* IE "ALL" T 
HEN3280 

3194 IFSE*="ALL" THEN3260 

3195 IFTE*="ALL" THEN3240 

3196 IFAE*» M ALL H THEN3220 

3199 FORY=lTOX: IFSE*=S*(Y) AND T 
E*=T*(Y) AND AE*=A*(Y) THEN4000E 
LSE3350 

3200 FORY = 1 TOX : QOTO4000 

3220 FORY» 1 TOX : I FSE*=S* ( Y ) ANDTE* 

=T* ( Y) THEN4000ELSE3350 

3240 FORY=lTOX: IFSE*=S*(Y) AND A 

E*=*A* ( Y) THEN4000ELSE3350 

3260 FORY^ITOX: IFTE*»T*(Y) AND A 



SOFTWARE -HARDWARE 



POR RADIO SHACK'S TRS-80 MODEL l/j 
TBtS-80 COLOR COMPUTER 

•SEND FOR FREE CATALOG* 



UTIUTY PROGRAMS ON CASSETTE 

SU-l CASSETTE COPY T 10S M SPECIFY III 
SU-2. CASSETTE PUMP $105 " COMPUTER! 



Y-PAK RECORDER STAND 

-HtS rnt no mun itfp tC\ I JM1 




TURN YOUR COMPUTER INTO A (WADE OF STURDY PLASTIC. 

2-5LOT SYSTEM. SWTTCH MOLDS RECORDER AT A 

BETWEEN THE TWO WITH EASE.. PERFECT AnSLE. 



RW/ROM U5ER-PAK FOR TR5-8Q COLOR $50 

'GAMES ALSO AVAILABLE* 

B ERICKSON SOFTWARE PO.BOX 11099 CHICAGO IL 60611 

CALL (312)276-9712* WORMATION 



E*«A* ( Y) THEN4000ELSE3350 

3280 F0RY-1T0X: IFSE*-S* (Y) THEN40 

00ELSE3350 

3300 F0RY=1T0X: IFTE*=T* ( Y) THEN40 
00ELSE3350 

3320 F0RY= 1 TOX : I FAE*-A* ( Y ) THEN40 

00ELSE3350 

3350 IFMS=2THENNEXTY 

3355 GOTO500 

3400 CLS4 

3410 PRINT81 , " *BI BLI OGRAPHY TIT 
LE SEARCH* "; 

3420 PR I NT@6 4 f " * I NPUT TITLE: "; 
3430 PRINTQ96, " (ONLY FIRST 32 CH 
ARACTERS) " ; 

3440 PRINT8128, I : LINEINPUTTE* 
3450 PRINT8356, " (S)CREEN OR <P> 
RINT? "| 

3455 I*«INKEY«: IFI*»" " THEN3455 
3460 I F I " S ■ THENA=2 : B0T03495 
3465 I F I *= " P " THENA= 1 : B0T03475 
3470 G0T03455 

3475 PRINTS353, " (B> IBLIOGRAPHY 0 
R (C) OMPLETE?" ; 

3480 I*=INKEY*: IFI*- M "THEN3480 

3481 PRINT@352, SC*; : PRI NTQ358, " 
♦** PRINTING *** "; 

3485 IFI*» ,, B"THENP=l:G0T03495 

3490 IFI*="C"THENP=2ELSE3480 

3495 IFTE*= ,, ALL"THEN3200 

3500 FORY= 1 TOX : GET# 1 , R ( Y ) 

3510 IFLEFT*(TE*,32)-LEFT*(T1*,3 

2> THEN4000ELSE3350 

3990 »* 

3991 ** PRINT ROUTINE 

3992 ** 

4000 I FS* ( Y ) = " 2 2 2 " THEN500ELSEBET 
*1,R(Y) 

4005 GET#2,R(Y) 
4010 GET#3,R(Y) 

4015 GET#4,R(Y) 

4016 GET#5,R(Y) 

4017 S*=S*(Y) :T*=T*(Y) : A*=A*(Y> 

4020 IFA=2THEN700 

4021 IFP=1THENPRINT#-2,TAB(20)S* 
( Y ) ; TAB ( 45 ) T* ( Y ) 

4025 PRINT#-2 f A*(Y) 
4030 PRINT#-2,T1* 

4035 IFLEFT*<T2* P 5) = '* " THENP 

RINT#-2,T2*ELSEPRINT#-2,T2* 
4040 PRINT#-2,TAB(3)P*;TAB(40)V* 

4045 PRINT#-2,TAB(3)D*;TAB(40)G* 

4046 IFP=1THEN4085 

4050 PRI NT#-2 , TAB (10) STRING* ( 55 , 
«.-.») 

4065 PRINT#-2, TAB ( 15)S* ( Y) ; : PR IN 
T#-2,TAB(50)T*(Y) 

4070 PRI NT#-2, TAB (10) STRING* (55, 
»_..) 

4075 IFLEFT*U1*,5)=" "THENP 



262 the RAINBOW September 1983 



RINT#-2ELSEPRINT#-2,TAB(3) I 1* 

4076 IFLEFT*< I2*,5>«" "THENP 
RINT#-2ELSEPRINT#-2,TAB(3) 12* 

4077 IFLEFT*< I3*,5> =" "THENP 
RINT#-2ELSEPRINT#-2, TAB < 3 ) 13* 

4078 IFLEFT*( I4*,5>- M "THENP 
R INT#-2ELSEPR I NT#-2 , TAB < 3 ) 1 4* 

4079 I FLEFT* < 1 3* , 5 > = " "THENP 
RINT#-2ELSEPRINT#-2,TAB<3> 15* 

4080 IFLEFT*( I6*,5)=" "THENP 
R I NT#— 2ELSEPR I NT#-2 , TAB (3)16* 

4081 IFLEFT*(I7*,5>=" "THENP 
RINT#-2ELSEPRINT#-2,TAB(3) 17* 

4082 I FLEFT* ( 18*, 5)-" "THENP 
RINT#-2ELSEPRINT#-2,TAB<3> 18* 

4083 IFLEFT*(I9*,5)-" "THENP 
RINT#-2ELSEPRINT#-2,TAB(3) 19* 

4085 PRINT#-2, STRING* (80, "-"): IF 
P=2THENPRINT#-2 

4086 IFMS=1THEN700 

4090 IFP=2 AND L-2THENGDSUB4150 

4095 IFP=1 AND L=8 THENGDSUB 415 
0 

4096 L=L+1 

4100 I FMS— 2THENNEXTV ELSE700 
4110 GOTO500 

4150 I FP=2THENFDRPR= 1 TD9ELSEF0RP 
R=1T03 

4160 PRINT#-2:NEXTPR 



4170 L— l: RETURN 

5000 PRINTQ357," (S)CREEN OR (P) 
RINT "J 

5005 I *■ I NKEY* : I F I *- " " THEN5005 
5010 IFI*="S"THENA«2:BDTD5020 

5015 IFI*»"P"THENA-1:8OTO5020 

5016 GOTO5005 

5020 CLS7:PRINTQ6, " *B I BL I D8RAPH 
Y LIST* "; 

5025 PRINTe66," SELECT FROM THE 
FOLLOWING "* 

5030 PRINTQ132, " 1) SUBJECTS 

"5 

5040 PRINTQ164, " 2) TABS 

5045 PRINTQ196," 3) AUTHORS 

" J 

5046 PRINT@228," 4) SUBJECT-TAG- 
AUTHOR "5 

5050 PRINTQ260," 5) TITLES 

" 5 

5052 PRINTQ292," 6) RETURN 

" 5 

5055 I*=INKEY*:IFI*«""THEN5055 

5056 IFI*»"l"THENLI»l:GOTO5067 

5057 IFI*="2"THENLI=2:8OTO5067 

5058 IFI*="3'»THENLI = 3:8OTO5067 

5059 IFI*-"4"THENLI»4:GOTO5067 

5060 IFI*** M 5 ,, THENLI"*5:BOTO5067 



YOUR COLOR COMPUTER JUST EARNED A MATH DEGREE! 




MATHMENU 

Developed by an engineer, Mathmenu is a 
powerful menu-driven system to turn your 
Color Computer into an intelligent, flexible 
tool for mathematics and engineering. 
Mathmenu takes the tedium out of math, 
leaving your full brain power to attack the 
"meat" of your problems. By rapidly mani- 
pulating matrices and vectors, performing 
integration and differentiation, solving 
quadratic equations, plotting user defined 
functions and much more, Mathmenu can 
help simplify the most complex problems. 
Whether you are a student or a professional, 
if you use math, y»u need Mathmenu. 



FEATURING; 

• 3D SURFACE PLOTTING — Pints a user defined equation on an 
X,Y,Z coordinate system in the High-Res graphics mode. Planes, 
surfaces of revolution, statistical surfaces, etc. can be easily plotted. 
Surfaces may be saved to disk or tape. We believe this is the only program 
of its kind commercially available for the Color Computer. 

PLUS: 

• Complete MATRIX Operations • 2D Function Plotting 

(up to 8 x 8) • Rectangular to Polar Conversions 

• Complete VECTOR Operations » Base Conversions 

• Numerical Differentiation • Large dumber Addition and 

• Numerical Integration Multiplication 

• Least Squares Curve Fitting • Reverse Polish Logic Calculator 

• Binomial Expansion with Hexadecimal 

• Prime Number Verification. ♦ Quadratic Equation Roots 

• Main Menu with Single-key Selection and Return (Disk Only) 

Complete documentation mi all functions is included. 

Im 16K (Srtte WWW'.'. $44.95 Fhaing Extended BASIC 

Documentation only S5.W (refundable with purchase) 

Or write fmr free brochure. . 

Inter \pcAction 

11$ Ward Strert * Dept. R - New Haven, CT 06519 * (203) M2-5748 
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3061 IFI*="6"THEN500 
3067 IFA=2THEN5500 

5070 ONLI 6OTO5100, 5200, 5200,530 
0,5350, 500 

5100 CLS5:PRINT«5, " *PRINTINB SU 
BJECTS* M f 

5105 PRINT#-2,TAB(5) BIBLIQ8 

RAPHY SUBJECTS : PRINT#-2 

5110 CT»0:SS*»S*(1 > 

5115 FORV=»lTOX:S*=S*(V) 

5120 IFS*OSS*THEN5135 

5125 CT-CT+1 INEXTV 

5135 PRINT#-2,TAB(11)SS*TAB(26)C 

T : I FS*= " Z Z Z " THENPR I NT#-2: SOTO500 

5140 ss*=s*:ct=i:nextv:print#-2, 

TAB (11) SS*TAB ( 26) CT: PRINT#-2: BOT 

□500 

5200 CLS5:PRINT85," #BIBLI06RAPH 
Y LIST* " | 

5205 PRINT@64," INPUT SUBJECT AR 

EA :"i 

3210 PRINT812B, 5 : INPUTSU»:CLS5: I 
FLI=2THENPRI NT@S, " PRINTING TABS 
" » ELSEPRINTS7, " PR I NT I NB AUTHOR 

S "5 

5225 IFLI=2THENPRINT#-2, "#** BIB 
LIOBRAPHY TABS *«*"ELSEPRI NT#-2, 
"«♦♦ BIBLIOBRAPHY AUTHORS ♦««" 

5226 PRINT#-2 

5230 IFSU*- M ALL"THEN5235ELSE5275 
5235 SS*=S*(1):PRINT#-2,TAB(5)S* 



(1) 

5240 FORV=lTOX:S*=S*(V) : IFS*-"ZZ 
Z " THENPRINT#— 2: BOTO500 
5250 IFS*OSS*THENPRINT#-2,TAB(5 
) S»:SS»=S» 

5255 IFLI«2THENPRINT#-2,TAB(9)T* 

(V)ELSEPRINT#-2,TAB(9)A*(V) 

5260 NEXTV:PRINT#-2:BOTO500 

5275 PRINT#-2,TAB(5)SU» 

5280 FORV=lTOX:S*=S*(V) 

52B5 I FSU**S*THEN I FL I =2THENP R I NT 

#-2, TAB ( 9 ) T* ( V) ELSEPRI NT#-2, TAB ( 

9)A*(V) 

5290 NEXTV:PRINT#-2IBOTO500 
5300 CLS3:PRINT88, " PRINTINB LIS 
T M ;;PRINT#-2,TAB(25) BIBLIO 
BRAPHY LIST «♦* ":PRINT#-2 
5305 FORV=lTOX: IFS* (V) **'ZZZ"THEN 
PRINT#-2: BOTO500 

5310 PRINT#-2,TAB(13)S*(V)TAB(30 

)T»(V)TAB(45)A*(V) 

5315 NEXTV:PRINT#-2IBOTO500 

5350 CLS4:PRINT«5, " * B I BL I OBR APH 

Y TITLES* 

5355 PRINT@64," INPUT SUBJECT AR 

EA: 

5360 PRINT812B,i: INPUTSU*: CLS5: P 
RINT87, " PRINTINB TITLES "; 

5361 PRINT#-2, BTRINQ* (80, ) :PR 
INT#-2,TAB(24) "*** BIBLIOBRAPHY 
TITLES ***":PRINT#-2,STRINB*(B0, 



TRS-80* COLOR COMPUTER* 

-16 K Extended Basic, Menu-Driven, Well- Documented, Easlly-Modllled. 
-For either cassette or diskette systems (Be sure to specify). 
-Place an order of at least $40 and get one extra of your choice free. 
-Orders shipped on cassette - Add $5 for shipment on diskette. 



-FURST- "ss? 
lata Element Dictionary driven File Update and 
Retrieval SysTem, Create and maintain files according 
to your specifications. Ideas for applications in- 
cluded $25 



-REPORT WRITER- ~~ 

Used in conjunction with FURST to selectively format 
reports on your printer. Includes headings and total 
capabilities .$15 



-MAILING LABELS- ^ 

Generate and maintain mailing label records. Selective- 
ly print desired quantities. Can keep several label files if 
desired. Designed for Printer VII, easily modified, $20 



-EXERCISE PLANNER- SKST 
Build and maintain complete exercise schedule for 
regular and/or weight programs. Display guides you 
through daily-calculated routines. Print complete 
schedule if desired $15 

-DISK DIRECTORY PRINT- 

For diskette users only. Get hard copy of disk directories on your printer for easy use and reference. Only $5 



Send check or money order to: 
LAND SYSTEMS 

' MSaf~~ P.O. Box 232 

Beiibrook, Ohio 45305 



Mo»i«'C0td 

LZZJ 
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"# ,, ):PRINT»-2 

5365 I F9U*< > " ALL " THEN5405 

5370 SS*«S*J(l) :PRINT#-2:PRINT#-2 

,TAB( 15) "*#**#•* TAB (25) S*3 CI)** 

*♦###" : PR I NT#-2, SX*3 
5375 F0RV=1TDX:S«»S«(V) : IFS^-ZZ 
Z " THENPR I NT# -2: GOTO500 
5380 IFS»OSS*THENPRINT#-2:PRINT 
#-2, TAB (15) "#####» TAB (25) S«3" 

****** : SS*-S«: PRINT#-2, SX* 
5385 GET#1,R(V) 
5390 PRINT#-2,T1«3 

5395 IFLEFT*(T2*,5)-" "THENP 
RINT#-2 ELSEPR I NT#-2,T2» 
5400 NEXTV:PRINT*-2:GOTO500 
5405 PRI NTH-2 : PR INT#-2 , TAB ( 1 5) " # 
#**# M TAB(25)SU*" #####": PR IN 

T#-2,SX* 

5410 F0RV»1T0X:S*=S*(V) : IFS*='*ZZ 

Z "THENPR I NT#-2: GOTO500 

5415 I FSU*OS«3THEN5425 

5420 GET#1,R(V) :PRINT#-2,T1»: IFL 

EFT*(T2*,5)-" "THENPRINT#-2 

ELSEPRINT#-2,T2» 

5425 NEXTV:PRINT#-2:GQTO500 

5500 ONLI GOTO 5600,5700,5700,55 

10,5510,500 

5510 PRINT@354," ALVAILABLE ON P 
R INTER ONLY " | 



SP SOFTWARE O 
FOUR NEW PROGRAMS FOR YOUR COLOR COMPUTER 

SPOUHP A screen damp routine of 368 bytes of fast, 
relocatable Machine language ends. All ROKS, color 
PHODES in A EMI shades, (nice size option in PflOOES 3 
or 4i position dump on paper, inverse image option, do 
■ort than 1 screen as for HPP graphics, Works on 
DrP288 LPVII etc. Cm with 1ASIC instructions. Needs 
BASIC!. 1 or an Ait printer fix. On tape. siA 

CONCPOLV Use this mhiu driven program to design and 
draw a fantastic variety of intricate and colorful 
patterns* suitable for dump to a printer, includes 
examples and instructions. Works in a 16K computer, 
EXT. or DISK BASIC. Comes on tape. $8 

SIXFOURK Use your 64K coaputer from BASIC. This 
prograa alios you to inspect fWI, neve RON to RAM and 
ran it there, disable DISK or EXT. BASIC, and aake 
setups with graphics, program* strings, and USR in 
upper or lower RAjf to get the best use of RAH. The 
program does the setups and includes tutorials and 
instructions to let you make setups. On tape. *28 

KJIWnU This sh<m program for toe (M computer mill 
display a rotating color globe of the earth. You get 
21 frames of a PJWOE1 globe mMcft is loaded into m 
of RAH by a driver program plus » instruction program 
all on disk to shoe off your MK color computer. $Z5 



SP SOFTWARE, 1 102 ULTflORE, LYNCHBURG VA 2A5B2 

^ 4 



5520 PRINTe384 i "DO YOU WANT TO P 
RINT? (Y OR N)** 

5530 I*=INKEY*:IFI*- MM THEN5530 
5540 IFI*3-"Y" AND L I -4THEN5300 
5550 IFI*3="Y" AND L I-5THEN5350 
5*560 I F I *= " N " THEN500ELSE5530 
5600 CLS5:PRINTQ3, " *BI BLIOGRAPH 

Y SUBJECTS* "l:CO»l 
5610 CT=0: SS»-S«3 ( 1 ) 
5615 FORV»lTOX:S*»S«3<V) 
5620 IFS»OSS*THEN5635 
5625 CT=CT+l:NEXTV 

5630 PRINTe32*C0+34,C0|TAB(7)SS* 
TAB(25)CT; 

5631 G0SUB5675: GOTO500 

5635 PRINT@32#C0+34,C0;TAB(7)SS* 
TAB ( 2 5 ) C T ; : CO=CO+ 1:1 FS*™ " Z Z Z "THE 
N5631 

5640 SS*»S»:CT«l: IFCO«>10THEN8OS 
UB5675 

5645 NEXTV:PRINT@32#C0+34,C0;TAB 

(7)SS«3TAB(25)CT; 

5650 G0SUB5675: GOTO500 

5675 PRINTQ452," PRESS *C TO CO 

NTINUE ";:co=l 

5680 I *» I NKE Y« I I F I »« " " THEN56B0 
5685 I F I »« " C " THENCLS5 : RETURN 
5690 GOTO5680 

5700 CLS5:PRINT@5, " *BI BL IOGRAPH 

Y LIST* "I 

5705 PRINTQ64," INPUT SUBJECT AR 

ea: "i 

5710 PRINTei28 s ; : INPUTSU«:CLS5:C 
0-1 

5715 IFLI=*2THENPRINT@7, " TAGS BY 
SUBJECT " ; ELSEPR I NT@5 , " AUTHORS 
BY SUBJECT "; 

5720 I FSU*= "ALL " THEN5725ELSE5775 

5725 SS*-S»(1):PRINT@32*C0+32,S» 

(1) 5 :C0»C0+1 

5730 F0RV-1T0X:S»-S»(V) : IFS*="ZZ 
Z"THEN5820 

5735 I FS*< >SS*THENPR I NTQ32#C0+32 

, S*"" i : C0=C0+1 : SS»=S* 

5740 I FL I -2THENPRI NT@32*C0+34 , J* 

( V > I ELSEPR I NT@32*C0+34 , A* ( V > 

5745 C0«C0+l:IFC0~>UTHENG0SUB56 

75 

5750 NEXTV:GOSUB5675:GOTO500 
5775 PRINTe32*C0+32,SU*5 
5780 F0RV=1T0X:S»=S»(V) 
5785 IFSU»»S»THEN5B00 
5790 NEXTV:GOSUB5675:GOTO500 
5800 I FL I-2THENPRINT@32*C0+66, T» 
(V) 5ELSEPRINT@32*CQ+66, A«(V) ; 
5805 CO-CO+ 1 : I FC 0= > 1 1 THENG0SUB56 
75 

5810 NEXTV 

5820 G09UB5675: GOTO500 
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Greetings! 

It's all right to be drawing squares, triangles, decagons, 
and such, but what is life without circles? 1 thought about 
circles for some time, but for the life of me 1 couldn't figure 
out how to make the turtle move in a curved line, I have a 
little instruction booklet about Color Computer turtle gra- 
phics, sol looked for"curves"in the index, and didn't find a 
thing. Finally, 1 happened one day to be down by the pond, 
and what do you think 1 saw? 1 saw that old turtle that had 
snuck out of my house a month earlier, and he was swim- 
ming. When he left he had taken my pen with him, whieh I 
had tied to the middle of his back and let hang down behind 



him, so he could draw. But by now the pen had slipped 
around so it was caught on his hind leg. Poor turtle! Maybe 
Bertha was right to report me to the SPCA the way she did. 
In any event, that pen was causing the turtle to be off 
balance, so that instead of swimming in a straight line, he 
was swimming in circles, 

1 studied closely, and discovered that his circles weren't 
really perfect circles. Everytime he stroked with his left foot, 
the pen at the end acted sort of like an oar and made him 
turn very slightly to the right. But after that initial turn, he 
would go straight again. In other words, his "circle" was not 
really a big closed curve, but a closed, many, many sided 
figure — a "hundred-agon," or a "thousand-agon." 1 went 
back to my Color Computer, determined to try out this 
principle that so fortuitously appeared to me at the pond. 
(Anybody believe in fate or astrology?) 

The first thing 1 thought was that in this new many-sided 
figure, ] wanted to make each turning angle as small as 
possible. That meant eaeh turn would be 1, 1 decided that 
each side should be as small as possible, too, so that my 
turtle might stay on the screen. I started with; 

FD 1 

RT I 

FD I 

RT 1 

planning to make 360 FDs, and 360 RTs. Pretty soon, 
however, my fingers got tired. 1 thought to myself, "There 
must be an easier way. A computer is a labor-saving device, 
and 1 need my labor saved." 

Well, there is an easier way, and 1 won't embarass myself 
by telling you how long it took me to discover it. There is a 
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DISTRIBUTORS 

wholesale distributors of tandym computer systems 




eJML SYSTEM 100 
PERSONAL COMPUTER 



64K EXTENDED COLOR 

$389 00 

(Delivered Anywhere in the USA) 



Everything You Need From Software To Hardware 
DEALER INQUIRIES INVITED 

Call or Write for Details on Programs and Discount Pricing 

16012 South Cottage Grove Ave, South Holland, IL 60473 
Division of Union Electronics, Inc. 
312-339-2777 



268 the RAINBOW September 19*3 



whole 'nother section of the program where you can type in 
commands to the turtle and store them for later use. This 
next section is sometimes called "the edit mode. " 1 call it "the 
edit room," because 1 like to think of the Color Computer 
turtle graphics program as a little house with rooms. Well, to 
get to the EDIT room from the RUN room, first press the 
BREAK button. That puts you back out on the house's f ront 
porch. Then press E for EDIT. 

Now you're in the£X>/7"room and there's a little eyebrow 
at the bottom of the screen. 

Before getting back to the circle, let's practice with some- 
thing simpler. Let's start with a square. In the edit room, it's 
best to label what you are doing, because you will be storing 
that "procedure" in the computer's memory. So let's label 
our square procedure with something like this; 

TO SQUARE 
Now, you'll have to play around with the keys a little 
before you become comfortable with typing in the EDIT 
room, but basically the up and down and right and left 
arrows will help you move around as you wish. Anyhow, 
here is how I type out a procedure for squaring*. 

TO SQUARE 

FD40 RT90 

FD 40 RT 90 

FD 4t RT 90 

FD 40 RT 90 

END 

There are some things you might wish to notice about the 
way 1 have typed in the procedure. First (or last), notice that 
1 typed iniTATDat the end. It's important to inform the turtle 
that a procedure has ended, Second, remember that the 



procedure needs that label (TO SQUARE). Third, notice 
that 1 didn't use a separate line for each instruction. In the 
RUN room, 1 had to ENTER each instruction separately, 
automatically giving each instruction its own private line. 
Here, I can type several instructions per line, as long as I 
separate them by a space. It so happens 1 chose to type in 
only two instructions perline before starting a new line; and 
the only reason 1 did was that I realized my instructions for 
moving forward and turning were going to be repeated four 
times, and I just wanted to be able to see the repetition easily. 
So 1 started a new line eaeh time 1 repeated the instructions 
to move and turn. It does make it easier to see, yes? If you 
wish to try this procedure out on yourown,pleasefeelfreeto 
experiment. For instance, you could type in the following: 
T« SQUARE 

FD40 RT 90 FD 40 RT 9t FD 40 RT 

90 FD 40 RT 90 
END 

In any case, let'stry to run thisproeedure.PressBREAK, 
then R, and you're in the RUN room. Then type in 
SQUARE. Does it work? If so, try it a second and a third 
time. What happens? That's neat! The turtle zooms around 
the square again and again. He's drawing over and over 
again on the same spot. We must be doing something right. 
However, let's try something else. You try what you want; 
but here is what I want. I go back into the EDITroom, and 
erase the last angle eommand. 1 don't really need that to 
draw the square; all it does is turn the turtle right back into 
his original direction. But what will happen if he's not 
returned back to the original direction? Here is what the 
squaring procedure looks like now: 



PARALLEL 
PRINTER 

INTERFACE 

FOR THE RADIO SHACK COLOR COMPUTER 
AND THE TOP 100 

• RUN ANY STANDARD PARALLEL PRINTER 
FROM THE SERIAL I/O PORT 

• WORKS WITH: EPSON, NEC, CENTRONICS, 
C-itoh, SMITH CORONA, RADIO SHACK, 
GEMINI, OR ANY STANDARD PARALLEL PRINTER 

• SWITCH SELECTABLE BAUD RATES FROM 300 te 9600 

• COMPLETE - ALL CABLES AND CONNECTORS 
INCLUDED 

• PRICE: $69 plus $3 for shipping and Imndling, 
Canadian orders odd %5 for shipping. Michigan 
residents add 4% sales lox. 




PRINTERS 

C-ttoh PROWRITER $ 365 

GEMINI 10X $299 

EPSON FX80 $ 550 
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Plus shipping 

CALL FOR PRICES ON OTHER MODELS FROM 
THE ABOVE PRINTER MANUFACTURERS 
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TO SQUARE 
FD 40 RT 90 
FD 40 RT 90 
FD 40 RT 90 
FD40 
END 

1 go back to the RUN room to try this out. Sure enough, it 
still works. I still get a square, only the turtle is not set back 
in his original direction. Now, if 1 run the squaring proce- 
dure several times, I get something more interesting than the 
turtle going around and around on his original path. Try it. 

Here's an idea. 1 have run a procedure four times in the 
R UN room. Ho w about if 1 turn that into a procedure? 1 go 
back to the EDIT room and define the following procedure 
(typing it out underneath — not over the TO SQUARE 
procedure): 

TO SQUAREAGAIN 

SQUARE 

SQUARE 

SQUARE 

SQUARE 

END 

I zip back into the RUN room, and run SQUARE- 
AGAIN. 1 1 works! Now, you try something along that line 
and see what happens. David, why don't you try doing 
something similar with triangles? Jonathan, try pentangles. 

Thinking about it, we've done some interesting things. 
Fiist of all, by deftningproceduresin the EW/'room, we've 
actually added to the simple commands that the turtle 
understands in the RUN room. 1 1 used to be that the turtle 
only understood how to RT and LT and FD and BK and et 
cetera. Now it understands how to SQUARE and SQUARE- 
AGAIN, and (if you've done it) TRIANGLE and TRI- 
AGAIN and PENTANGLE and PENTAGA1N. Another 
interesting thing is that we've put procedures inside of 




Let your Co. Co. do the "walking 1 



Turn your computer into an automatic 
telephone dialer. 

Generate touch tones from C.C.'s keyboard 
or stored directory. 

Save, load and modi'y directories on tape 
or disk. 

Requires Extended Basic and Touch Tone 
phone service. 



CASSETTE VEHSIOH - $79.95 
91SK VEKSION $34.95 



Send cheque or money order to: 

CHRIS CQKWUTEKS 
■ C299 AJderwo»d Lane 
•elta, B.C. Canada V4E 3E7 



IB.C- ReiidztiU include. 6% .Safe?. Tax.) 



procedures. TO SQUAREAGAIN, for instance, is a proce- 
dure that contains some TO SQUARE procedures. 

Now, if 1 had my tape recorder hooked up to my Color 
Computer, 1 would be able to save these new procedures on 
tape. They'd be part of my turtle's new repertoire forever. 
Isn't that neat! The turtle becomes more and more clever. 
I t*s as if you*re a horse trainer, or a dog disciplinarian, I've 
got to get my tape recorder i n there. Those of you with disks 
will be able to save procedures on disks. 

I haven't forgotten about circles, and I'll get around to 
them in about two shakes. 

Looking back at all my procedures, they look pretty 
simple. TO SQUAREAGAIN was merely TO SQUARE 
repeated four times. TO SQUARE was merely FD 40 and 
RT 90 repeated four times. Is there a shorthand for repeat- 
ing parts of a procedure? You bet there is! Try this: 

TO SQUARE AG AIN2 

REPEAT 4 (SQUARE) 

END 
And this: 

TO SQUARE2 

REPEAT 4 (FD 60 RT 90) 

END 

If something goes wrong in your experimentation, just 
remember that the turtle carries out everything you tell it to 
with absolute precision and literalness. Your instructions 
have to be perfect. Now, if 1 can make the turtle automati- 
cally repeat instructions for a four-sided figure, surely it will 
do the same for the 360-sided figure that 1 want to use to 
approximate a circle. I try this: 
TO CIRCLE 

REPEAT 360 (FD I RT 1) 
END 

Unfortunately, thatsillylittleninny on the screen drawsa 
stop sign instead of a circle. I can take a hint. I'm going to 
stop right now, Seeyou next month. Maybe by thenyou or I 
will have figured out why the turtle drew a stop sign. Write 
me a letter, and let me know, 1 know 1 've promised to tell you 
about the pigincident.and 1 will — but Ijust don'thavetime 
right now. 1 remain, 

Uncle Bert 



P.S. You can send your cards and letters to me in care of my 
good friend Dale Peterson. Just address them like this: 

Uncle Bert Woofensburgcr 

c/o Dale Peterson 

the Rainbow 

9529 U.S. Highway 42 

P.O. Box 209 

Prospect, KY 40059 
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BASIC TRAINING 



LET'S CLEAN UP 
THAT TEXT SCREEN 

By Joseph Kolar 
Rainbow Contributing Editor 



One of the most pleasing things that one can notice in 
a program is the neatly centered and located text. 
How disconcerting it is to look at text that is haphaz- 
ardly tossed on the sereen without any thought to its 
appearance. You've seen it of ten enough to recognise sloppy 
text. An otherwise technically well conceived program is 
belittled with sorry text presentation. To wit: not centered; 
jammed up in the upper left corner; not ending a line with a 
hyphen; the left margin being uneven and much, much 
more. 

Good text presentation is very important. Now, fire up 
your computer and type PRINT MEM and ENTER. Copy 
it down! Copy the three lines, 50 through 54 from the 
previous BASIC Corner. 

You should have: 
50 PRINT" THE RAINBOW MAGAZINE IS THE" 
52 PRINT"BEST MAGAZINE FORNEWCOMERSTO" 
54 PRINT'THE WORLD OF COMPUTING." 

First, type PRINT MEM and ENTER. Copy it, and RUN 
it. Does it look okay? Did you start line 50 with two spaces? 
Did you start lines 52 and 54 right after the "? 

Note that when writing individual lines, you can't end 
under the " or you will get a blank row between lines when 
you RUN the program. 

HINT: You don't need the final " in the PRINT state- 
ments. Note that this is not true l or INPUT statements. 

Most importantly, it is not necessary to print the sentence 
above on three program lines. It can be done on one line. 
Key in line 60: 

60 PRINT:PR1NT" THE RAINBOW MAGAZINE IS 
THE BEST MAGAZINE FOR NEWCOMERS TO 
THE WORLD OF COLOR COMPUTING. 

RUN'ii and see if you have two identical sentences separated 

(Joseph Kolar is a free-lance writer and programmer 
dedicated to proselytizing for computers in general, 
and the CoCo specifically.) 
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by a blank row. If not, you know what to do. When you have 
a good copy, type PRINT MEM, ENTER and copy it. 

You can calculate how many bytes of memory you saved 
from the data you collected. The key to this new technique is 
the " after PRINT. Draw an imaginary vertical line to the 
right of" . Let's start over! Type NEWanA ENTER. Key in: 
50 PRINT:PRINT" . 

Skip two spaces to start a sentence and type: THE RAIN- 
BOW MAGAZINE IS THE. Stop and note that you have 
three spaces to go to reach the i maginary line under the NT". 
Count the letters in the next word. If the word was a two 
letter word or if the first syllable had one letter plus a hypen, 
you could add it. Keep in mind that a space is needed after 
"THE. "There are just two effective spaces before the imagi- 
nary line. BEST is a one syllable word with four spaces so it 
won't fit. 

Type in spaces under NT" and you will reach the imagi- 
nary line. Start typing BEST MAGAZINE FOR NEW- 
COMERS TO. Hold it! We are coming close to the imagi- 
nary line. We allow one more space after "TO." That leaves 
us one more spaee before wc come to the imaginary line. 
Checking the next word, we find "THE" to be a three space, 
single syllable word. No good! We go two spaces until we 
reach the imaginary line and start typing under the B and 
continue to type. We finish our sentence before wc come to 
the imaginary line. Good work! 

By now you have figured out that the imaginary line is our 
left hand border. 

Key in NEW and ENTER. We will go, step by step, 
through the placement of a paragraph using only one pro- 
gram line. Here is the paragragh: 

YOU WILL PLEASANTLY DISCOVER, THAT AS 
YOU PROGRESS, YOU WILL COMMIT MORE AND 
MORE TO MEMORY. REMEMBER, WITH AVAILA- 
BLE REFERENCE MATERIAL, IT IS NOT WRITTEN 
IN BLOOD, THAT YOU ARE REQUIRED TO MEMO- 
RIZE EVERYTHING. ALL YOU HAVE TO KNOW IS 
WHERETO LOOK IT UP. 



One cautionary note. A string of more than 255 characters 
willjust hang up the computer on the line you are keying in. 
As you will presently see, you will have to back off to the end 
of the last full line, end the line and start a seeond line. 

Type 10CLS:PRINT:PR1NT", skip two spaces to start a 
sentence and start typing. You have one space to go before 
the imaginary line. Space it in and cross the imaginary line. 
Continue keying in "THAT AS YOU PROGRESS, YOU 
WILL." You have two spaces to get under the T. The first 
syllable of the next word, COMMIT is three letters, which is 
not enough. Put in two spaces and begin under the T to type 
some more. 

COMMIT MORE AND MORE TO MEMORY. Only 
one space to cross over the imaginary line. So, space and 
under the C keep typing REMEMBER, WITH AVAILA- 
BLE REFERENCE. Hold it! We are past the imaginary 
line. Back up to REF, the first syllable. That leaves us four 
spaces to get to the imaginary line. The next syllable is ER. 
REFER leaves us two spaces to go. We need a hyphen so we 
ean type REFER, space, cross the imaginary line and start 
typing again. 

Type ENCE MATERIAL, IT IS NOT WRITTEN. Stop! 
Right to the imaginary line that time. Good! Key in some 
more text without skippinga space. We want the next word 
right af ter the imaginary line because we know that it is the 
left margin. IN has to be right at the margin. 

Continue typing IN BLOOD, THAT YOU ARE RE- 
QUIRED. That leaves one space. Space and begin underthe 
! to key in TO MEMORIZE EVERYTHING. ALL YOU. 
Right on the button! 



!l(§ w (g 

MYSTERIOUS < 



ISLE 



GREAT NEW TEXT ADVENTURE GAMEI 

Vou vaguely remember being put in the 
lifeboat as the ship was sinking. Now you 
mwaken on the beach of MYSTERIOUS 
ISLE . . . alone in the small battered boat. 
Can you find the pirate's fabulous treasure 
and escape with it und your Hfe!! 

TRS-80 Color Computer* 

Requires 1 SK Extended Basic 

CASSETTE $21.95 

including postage 
Send check or money order to: 
Computer Dynamics 

3640 Summitridga Lane 
Orange, California 92667 

-TV T»rx*y Corp 



Since we want HAVE at the left margin, we type H under 
the Tand keep typing. Uh-oh! We typed HAVE TO KNOW 
IS and can't depress any more keys. We ran out of string 
space!. That's a fine how do you do! 

The solutionistobackuptothelast word onthe previous 
line. Putaclosing"afterthelast word and then put a; space, 
because a ; always allows a leading space, 

A new program line must be started, line 20. Key it in and 
keep typing text; 20 PR1NT"HAVE TO KNOW IS 
WHERE TO LOOK IT. Right on the button again. We 
cross the imaginary lineand since we want the word right up 
to the left margin, we key in UP under HA. 

There are always exceptions to every rule. Remember, 1 
mentioned that you do not need the final " in a print state- 
ment? Well, you don't in line 20. But line 10 is an exception 



"You've seen it often enough lo 
recognize sloppy text. An other- 
wise technically well-conceived 
program is belittled with sorry text 
presentation. " 



because, like an input statement, we have to close the state- 
ment with a " if we plan to add something else. So type ;. 
RUN it! How about that? A lot of work but worth it. When 
you get your breath back, let us review. 

When printing text, type one line at a time. It doesn't 
matter in what column the " after PRINT is. It could be 2* 
PRINT" or 20 PR1NT:PRINT" or 20 CLS:PRINT; 
PRINT'. The imaginary line is right after the " no matter 
where it falls, and this is the left margin. Always skip two 
spaces to start a sentence. 

NOTE: Some programmers like to indent two spaces 
when a new sentence would butt up at the left margin, but 
some don't. 

Once you determine where your imaginary line is located, 
always start your next syllable, word or indented spaces 
right after the ". Never start punctuation marks, hyphens, 
parts of syllables (asopposed to an entire syllable) or a single 
space after the imaginary line. 

•etermine how much text you can safely fit on the line. 
Make sure that the line ends with the last letter in a word; a 
syllable with a hyphen or a punctuation mark to end the 
sentence. Fill in any blanks with spaces to the imaginary 
line. 

If a punctuation mark ends a sentence right before the 
imaginary line, make sure you start the next line with two 
spaces. !f a word ends just before the imaginary line, do not 
skip a space if you want the next word to butt up to the left 
margin. 

If you run out of string space and you are unable to type 
any more text, back up to the last full line. Put a closing " 
just after the imaginary line, then put a Start a uew 
program line and type right after ** and continue. 

If you typed this in two program- lines, you required 275 
bytes. If you typed it in the nine individual lines, you needed 
319 bytes. That adds up to 44 saved memory bytes. 

Nice going, indeed! 
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Software Revtew^^^^^^^^SSSSSSKZs 

Sea Dragon: 
Fast Paced Submarine Action 

There is much to like about Sea Dragon, a new arcade 
game from Adventure International. Why, then, am I reluc- 
tant to tell you to run right out and buy it? 

Let me start by extolling the game's virtues — and there are 
several. 

The self starting, machine language game begins with a 
scoreboard called "The Famous Sailors Hall of Fame." (A 
bit redundant, but so what?) The top 10 scores will be 
recorded here, 

A very realistic voice comes through the TV speaker 
saying, "Welcome aboard, Captain!" (Wow! How did they 
do ih*i?) 

Your ears arc then treated to a beautiful rendition of 
"Across the Wide Missouri" and a couple of other sailing 
tunes. Theoretically, you may at any time begin to play the 
game by pressing 1 or 2 for the number of players or the 
letter "P**f or the Practice Mode. (Did he say "theoretically?" 
Ah — we've just touched upon one of Sea Dragon 's faults. Ill 
explain shortly.) 

Then you must choose your level of play — from zero 
(slowest) to seven (fastest). The instructions claim that zer« 
is"easiest," but, personally, I find a slightly higher level such 
as 2 to be a bit easier. The screen scrolls by faster, but 1 can 
also shoot and jump faster. 1 agree, however, that level 7 is 
the "most difficult." In a two player game, each player 
chooses his own level. 

Ready to go? Wait just a second. You've got two more 



choices to make: M usic of f, yes or no? Joy stick or keyboard? 

Now what's this about "music off?" 

Each player gets three submarines (game lives). If you said 
"no" to the "music off" prompt, then when your first sub 
appears on the screen, it will be accompanied by a rousing 
chorus of "I'm Popeye the Sailor Man" (toot, toot!). The 
loss of each game lif e is signaled by a few sad notes played in 
a minor key, 

I f ound that cute the first couple of times, but after that 1 
was glad to have the option of doing without. 

At last— here we go! Your mission is to sail through an 
aquatic minefield and navigate treacherous underwater 
caverns with a limited air supply, shooting at or jumping 
over a variety of obstacles, on your way to the ultimate 
target; the Master Mine. 

Choose your weapon. If you want to play with the 
keyboard, press the spacebar to start the screen scrolling 
from right to lef t. Move up, down, lef t (drop back) or right 
(forward) with the four arrow keys. The spacebar will fire 
torpedos straight ahead. The ENTER key will send a missile 
upward to a target above you. 

"While it might take a bit more practice," says the 
instruction sheet, "the keyboard will ultimately p rovide the 
best maueuverability'." Maybe it will if your fingers are 
better coordinated than mine. 1 did much better with the 
joystick. 

The fire button on the joystick starts the action and shoots 
the torpedos— but you still need the ENTER key for the 
missiles. Maybe with some of the newfangled sticks that 
would pose no problem, but with the standard Radio Shack 
stick, since it takes one hand to hold the base of the 
controller and press the firebutton. and the other hand to 
work the stick, that doesn't leave any hand free for the 
ENTER key. I tried holding the key down with an elbow or 
wedging it in with a small piece of paper. That had the 
interesting effect of launching the missiles at random — and 
some of them even hit what they were supposed to. 

You get from 50 to 500 points for each mine, stalactite, 
battleship or laser sh»oter you can shoot, but youU soon 
find that there are some obstacles you can't shoot. You can 
only jump, duck, or run. No points f#r that, but you stay 
alive. 

You can lose a game life by colliding with any obstaele, 
with the ocean floor, or with the walls and ceilings of the 
caverns. You ean also get killed by deadly ray sfrom the laser 
shooters, or by fallout from a mine that you've shot. 

Although the instructions don't mention it, the game is 
played in plateaus. If you lose your sub shortly after starting 
out, your next game life starts again at the beginning. If you 
can survive as far as the battleship that fiiards the entrance 
to the first cavern, you've reached the first plateau. Now if 
you get killed, youll start again at that point. Make it 
through that cavern, and when you come up for air, you're at 
the second plateau. 

How many plateaus and caverns and obstacles there are 
bef ore you get to the Master Mine, what happens af ter you 
shoot it (f or 5,000 points) or what the penalty is f or running 
out of air, I can't tell you, because 1 just never could survive 
long enough to find out. 

Earlier, I mentioned that there's a "Practice Mode." You 
get an unlimited supply of replaeement subs, and the points 
don't get posted to the scoreboard. Without the Practice 
Mode, I'd never have seen the second plateau, 

Sea Dragon is not just one game. Actually, it's two! What 
I have been describing till now is only the first game on the 
tape, the "novice version. "There's also a sccondgamc called 



co co service 
from 

Creative Electronics Co. 

A4K Upgrades $80.00 Installed 
32k Upgrades »30.00 Installed 
Extended Basic W/Manual CWri te> 
Operating Light 410.00 Installed 
Video Interface *20.00 Installed 
Clock Boards *SO.OO Installed 
Keyboards *80.00 Installed 
Roms Burned & Installed in 

custom Rom Paks (Write) 
Me recommend C ITOH PRO WRITER 

printer and Panasonic monitor. 
C ITOH Printer »425. OO+Sh i pp i ng 
Panasonic CT-1112 Color Mon.»360+ 

shipping. 
Fast turn around on all items. 
Above prices apply to operating 
D,E,F Boards & TDP Computers. 
INCLUDE »5.00 FOR RETURN SHIPPINB 
SEND S.A.S.E. FOR DETAILS AND FOR 
FURTHER OFFERINGS. 

CREATIVE ELECTRONICS Co. 
4211-7th Ave. 
Rock Island, II. 
41201 
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the 'expert version." It is played exactly like the other, but 
with more and trickier and deadlier obstacles. Even in the 
Practice Mode, I've never made the first plateau. Better 
arcade players than I am will be challenged. 

As I said, there's a lot to like about Sea Dragon. So what 
could be wrong? 

Unfortunately, Sea Dragmn suffers from a couple of 
major faults that a S35 program just shouldn't have. 

One of them, as I alluded to earlier, is the problem of 
making the initial selection -one player, two players, or 
practice. Under the heading of "Beginning the Game," the 
instruction sheet states: "When the . . . Hall of Fame is 
displayed on the screen, you may choose the number of 
playersf press 1 or2),orenterthe Practice Mode by pressing 
P." 

Sorry, but it doesn't work that way. When the music that 
accompanies the scoreboard gets underway, the keyboard 
response becomes most unfriendly, and unless you happen 
lohit the key at exact ly the right second, you will just have to 
sit through an entire chorus of "Acrossthe Wide Missouri." 
Beware of holding the key down in frustration, or you may 
find that, without meaning to, you have selected one player 
at level one, or two players with the first player to play a t 
level two. 

If you have selected the "music of f " option, then when the 
scoreboard shows up again at the end of the game, it will 
sometimes do so silently, and youmay select your next game 
easily at any time. But other times, like it or not, the eoncert 
and the frustration will start all over again. 

Remember that if you didn't turn the music off. each game 
life ends with a few notes of music as the action pauses If 
you are playing without music, then when each sub is sunk, 



the screen will jump immediately to the next event— either 
the next sub, or the scoreboard. 

In the early going, that won't make much difference. But 
what happens after It games, or five two player games? 
Then, of course, it's possible you'll finish with a score that's 
not one of the 10 best. In that case, since the screen changes 
instantly when the game ends, you may never see what your 
score was. That can be very annoying. 

I am also not enamored of the packaging. Besides being 
inconvenient, it may be a contributing faetor to the high 
price. Sea Dragon is supplied on one cassette in a bulky, 
awkward, vinyl book siz.e storage case designed to hold two 
cassettes, I much prefer the simple packaging used by 
Spectral, Mark Data and many other software publishers. 

Here, tben, are my recommendations to the authors and 
the publisher: 

— Reprogram the scoreboard audio so that, when the 
game is first loaded, theconcert will play once only, and that 
all subsequent appearances of the scoreboard will be silent. 
Amend the instructions accordingly. 

Reprogram the game action so that when you go down 
for the third time, the final score will stay up there for a few 
seconds, with or without the musie. 

—Sell the game in a simple, convenient, inexpensive 
package, and cut the price to reflect the cost savings. 

If these changes are made, I will then be able to 
recommend wholeheartedly to my fellowCoCoenthusiasts: 
Set sail for your nearest software dealer and reel in a prize 
catch. 

(Adventure International, Box3435, Longwood, FL 32750, 
32K ML cassette, $34.95) 

-Neil Edward Parks 
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00 YOU HAVE A 32K SYSTEM WITH 64K MEMORY CHIPS ?? ARE YOU STILL BEING TOLD YOU CAN ONLY USE 32K FROM BASIC ?? 

DCN'T BELIEVE IT .'! - KEY COLOR SOFTWARE brings you the K£V-g64K , An exciting NEH SOFTWARE utility that allows 
any STANDARD 32K COLOR COMPUTER TO ACCESS 64K RAM FROTS53TC, and with NO HARDWARE MODIFICATIONS REQUIRED!. 1 ? 



*** Works with CASSETTE based systems! *** 



The KEY-264K divides the 64K ran memory into two 32K banks or sides, each of which can be utilized independently 
by the flASIC interpreter, with the ability to switch instantly from one side to the other. IT'S LIKE HftWINfi TWO 
COMPUTERS IN ONE! ! Have your BASIC program on one side and keep your variables on the other side, or have your 

..J- ...... *..k*.~. »kn » a* k«di n »Aiir nrnnrVl nn nAA * » fits 5nH llCQ t K 



wain program on one side and your subroutines on the other side, or have your program on one side and use th 
other side for 4 additional HI-RES pages, or any combination you like, The possibilities are endless because the 
KEY-264K allows full communication between sides plus the ability to switch back and forth at will, all from 
within BASIC. You could also have different programs in each side and switch back and forth between then using 
simple keystrokes, even while the programs are running!! Or run them both at the sane time in the 
FfjRtfiROlNO/8ACKSR0«JNO MULTI-TASKING mode, Don't buy that printer buffer yet! With the KEY-264K you can be 
printing in the background side while utilizing your computer normally in the foreground side AT THE SAME TIME!!! 
Debugging a program? Cm either a BASIC command or simple keystrokes to instantly duplicate your program, in it's 
present status, on the opposite side. Switch to the opposite side later and pick up exactly where you were before! 

For DISK users, the KEY-264K allows you to alternate between DISK and EXTENDED BASIC on the same side with 
simple keystrokes. No need to pull your controller or power down. You can bt in EXTENDED BASIC on one side and in 
DISK BASIC on the other side and still switch back and forth and have full communications between trie two sides. 

does this and MORE thru extensions to BASIC, No need to learn a new language! The KEY-264K adds 
and 1 function to BASIC, including powerful new BLOCK MEMORY HOME and GRAPHICS UIEHlNi commands, 

Tr >* KEY-264K works on 32K svstems with "E", "F* or euen modified 'D' boards and requires EXTENDED or DISK BASIC 
with BOW €4* MEMORY CHIPS! Systems with piggy-back 32K or half-good 64K memory chips HILL NOT WORK! < 

ORDER YOUR KEY-264K CASSETTE TODAY by sending chec* or money order for 139.95 plus $2.00 postage U.S.A. 
(*5.0tf outside U.S.A.) Mass. residents add a* sales tax. 

KEY COLOR SOFTWARE ^ 
P.O. BOX 360 

HARVARD MA. 01451 
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Book fterfew— ZE?£\ 
Illustrated Computer Dictionary 
Makes Good Guide 

The Illustrated Computer Btctionary f rom the editors of 
Consumer Guide is like one of those poeket sized language 
guides that helps you say what you mean so you can avoid 
telling a waiter in Italy that you'll have the Moiled alarm 
clock with a side order of locomotive wheels. 

That is to say, it is a simple guide to common computer 
terminology that will take a normal human being through 
the labyrinthine channels of a programming artiele written 
by a computer specialist, It probably won't cause the mean- 
ing of all the jargon to come clear, but it will give you some 
idea of what's going on. 

The very nature of the comp uter — something very techni- 
cal and new to human experience— guaranteed that a jargon 
would grow up around it. To the uninitiated, that jargon 
appears to be more like a thieves' cant: a language purposely 
made confusing to all but the select. 

The Consumer Guide dictionary (a 180-page, spiral 
bound paperback) opens up the jargon by patiently and 
simply plodding through it so that a new user can get a grasp 
on the terminology. Old hands can learn a thing or two from 
the dictionary, as well. All too often, we toss around acro- 
nyms and jargon without really knowing what we're talking 
about. It's easy to get deeper into a conversation with Mr. 
Computei Wizard than we bargained for, then stupidly nod 
just like we know what's going on. With this guide, at least 
we may have run aeross the words before. 

As are all Consumer Guide books, the dictionary is abso- 
lutely non-preferential to any manufacturer. There is very 



little manufacturer-specific language defined in the diction- 
ary. Most of the terms are general and applicable to almost 
any system. 

The illustrations in the dictionary are simple, but elegant 
stipple-shaded line drawings, used to clarify written defini- 
tions. The terms are listed alphabetically, but in their most 
eommon forms (in most cases). Acronyms are alphabetized 
as they stand, not in order of the words abbreviated. For 
example, "EDP" comes after "editor" instead of after "elec- 
tronic bulletin board" as it would if listed as "Electronic 
Data Processing." 

One of the neatest things about the book is the definition 
and pronouncing guide to acronyms. It defines acronym as 
"a word formed from the initial letter or letters of the succes- 
sive parts (or major parts) of a compound term." 

For instanee, most of us know that BASIC stands for 
Beginners All-Purpose Symbolic Instruction Code. All 
right, class, how many of you knew that "bit"* is actually an 
acronym for iiinary Dig/ J 1 ? Shucks, I didn't even know that 
a nibble is half a byte. 

My only criticism is that many of the definitions are 
skeletal, leaving the reader wondering just exactly what is 
meant. On the other hand, complex information processing 
isn't this book's purpose. It's a traveler's guide and it's a 
good one, 1*11 surely have a copy on hand the next time I try 
to translate the native speech, 

(Illustrated Computer Dictionary, Editors of Consumer 
Guld«, Exeter Books. NY, 1983, spiral bound paperback, 
180 pages, call a bookstore for price) 

—Bruce L. Sublett 



Find The 

COLOR COMPUTER INFORMATION 
YOU NEED 
COLOR COMPUTER INDEX O 
COLOR COMPUTER CATALOG "O 



American Library and Information Services 

Dept. I?, 3705 Mary Ellen NE, Albuquerque. NM 87111 

Gentlemen; 

~ Yes! Send me COLOR COMPUTER INDEX 1980-1961 at 35 (Canada and Mexico 56) 

G Yes! Sign me up for COLOR COMPUTER INDEX 1982 (4 issues) for $16 (Canada and Mexico S20) 

□ Yes! Sign me up for COLOR COMPUTER CATALOG 1962 (fwo issues) for $20 (Canada and Mexico 324) 

□ YES! Sign me up for Color Computer Index 1983 (Six issues for $24— Canada & Mexico $30} 

□ YES! Sign me up for Color Computer Index 1983 (Two issues for $20— Canada & Mexico $24) 

Single Issues: 

Color Computer Index $6 U.S. (Except 1980-1981) 
Color Computer Catalog $12 U.S. 

Name 

Address . ....... , _________ 

City State _ Zip 

trw RAINBOW September 1983 
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Indexer Will Keep 
Track Of Your Variables 



Where is (he variable ZQ$? 

Indexer is a utility which can answer that question and 
more! "Which lines in my program make reference to line 
275 (or any other line)? Bid I ever use the word 'monster' in 
my program? Where was the keyword 'GOSUS' used'.'" 

Indexer is a powerful machine language utility which 
cross references a BASIC program. It cross references varia- 
bles and line numbers and tells in which line number they are 
used (as in the case of GOTO ox GOSUS). Additionally, it 
will search your program for any word that you want! 

Indexer is very useful for final documentation of a pro- 
gram or for debugging. A list of all variables used and line 
numbers referenced within the program is essential when 
working on a faulty program. Indexer will provide suchalist 
in a matter of minutes. 

The program is a little «ver 2K bytes long and loads into 
the top of user RAM. It is written in position independent 
code (for 16K or 32K machines with or without disks) and 
can be relocated anywhere. 

Load Indexer by typing CLEAR 20O.&H377F (&H777F 
f«r 32K). This is absolutely mandatory. If you forget this 
step, your computer goesoffto never-never land! Next type 
CLO ADM "INDEXER" (for 32K, C LOAD At "INDEX- 
ER". &H4000) then type EXEC. /^ewrisnowinthe"back 
of the mind" of the computer. At this time you may start 
entering a new program or load in a previously saved one. 

Indexer effectively adds three new keywords to the BASIC 
vocabulary, @ I, @S and @K. Typing @1 eauses an indexed 
list to be created and outputs the result to screen or printer. 
@S will search the BASIC program for any string up to 32 
characters long or search for any BASIC keyword. @K will 
kill the workings of Indexer and reset all "hooks" back to 
normal operation. 

Likeallgood utilities, you don't even know that Indexer is 
there until you need it. When you do eall on Indexer, by 
typing one of the above three commands, the screen clears 
and a header appears to let you know y«u are in Indexer. 

If the command typed was @ I , you are then prompted f or 
certain information. To the prompt "program name?" you 
may respond with up to 12 characters. Then you will be 
prompted for the date, Here you may type in up to 18 
characters. (1 found that using additional text information 
here helps document theprogrambetter.) A final prompt of 
"PRINTER (Y/N/R)?" is asked. Y=YES, N=NO and 
R=RETURN to BASIC. If the response is "Y" the printer is 
checked to see if it is online. If not. "PRINTER BUSY" is 
displayed. The program now goes into action outputtingthe 
cross reference to the printer in a very organized and sequen- 
tial format. What you now have is a listing of every variable 
used within your program and in what lines that variable is 
used. You also have a list of every line number that is called 
on and the calling line numbers. 



UTILITIES AND GAMES 
FOR THE 
COLOR COrV*»UTER 

BACKUP $9.95 

Speed up disk backups, helps to recover 
crashed disks. Bypass I/O errors and fix 
many disk problems, 

CATALOG $9.95 

An automatic disk file cataloging system. 
File the directories of your disks. 

COPYTAPE $9.95 

Copy, merge, and backup your tape based 
software. Works even with most popular 
pre-loader tapes. 

CZAP $9.95 

A disk inspect and modify routine. Learn 
how disks work, fix problems on your 
disks. 

CCRPM $12.95 

A disk drive speed checking routine. 
Displays on your screen the current, 
average, high, and low speeds of your 
drive. Complete with instructions for 
correcting the speed of your disk drive. 

NEATDIK $6.95 

Places the file names of your disk 
directory into alphabetical order, Makes 
finding programs on vour disks easy. 
Keeps your disks in order. 

OFFLOAD $9.95 

Create tape backups of your disks. A disk 
to tape, tape to disk backup system. 

ON ERR $12,95 

An error handler for BASIC programs. 
Allows your program to receive control 
whenever any error occurs. Take control 
and fix your problems. 

TAPEDlR $9.95 

Create a directory of your tapes. Lists 
program name, length of program, start, 
cndT and transfer addresses for all 
programs on your tapes. 

TAPELIB $12.95 

A BASIC tape subroutine append routine 
and a starter library of 5 subroutines. 
Create your own subroutine library on 
tape to append to your programs. 

TAPEXFER . $9.95 

Load your tape programs to disk auto- 
matically. Great for Chromassette sub- 
scribers, automatically loads an entire 
issue to disk. 

TREK80C , , $14.95 

The classic Star Trek computer game. A 
real time game with moving Klingons and 
action graphics. 

Please add $1.M shipping and handling 
on all orders. Pa. residents add 6% sales 
tax. Canada orders must be paid in 
American funds. No COD or charge cards, 
s nd check or money order onlvto: 
A.M. HEARN SOFTWARE 
602 S. 48th Street 
Philadelphia, Pa. 19143 
Write for a free catalog of these and other 
products. 

Dealer inquiries invited. ^ 
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If you answered "N" to the printer prompt, then all the 
above information is listed to the screen. The information 
flies by somewhat quickly (as when giving the LIST com- 
mand), but this can be stopped simply by hitting the space- 
bar at any time. To resume the output, hit the spacebar 
again. To abort the output, press "A." 

The command @S followed by a string up to 32 charac- 
ters long, will cause Indexer to search for that string. If the 
string is found, operation goes to the BASIC edit mode. At 
this time you can edit the string as you like (the way you 
would in BASIC) or hit ENTER to keep the string as is and 
continue the search for another occurrence of the string. 
Youmay type "Q"to*;uitthe search when you are in theedit 
mode. Afterthelaststringhasbeen found, youaretold that 
"SEARCH FAILS" and control is returned back to BASIC. 

Indexer resets a few RAM "hooks" for its operation, If 
you should want to return the system to normal operation, 
then type @K. This will set the hooks back to normal, and 
defeat the operation of Indexer. To restart, type EXEC 
&H37BF (&H77BF for 32K). 

Operational information supplied with the program was 
good. In addition, memory loeationsare given for changing 
the printer output format and baud rate by POKEing the 
proper codes. 

If you writg long programs and find it to be a nuisance to 
keep a running list of variables used, then Indexer was 
written for your convenience! I recommend it. 

(ML-IJS'R Software, 115 Rising Sun, Fort Mitchell, KY 
41017, S14.95 tape) 

— Al Burzynski 




FLY the F1« 

Instrument 
Flight 
Simulator 



Exciting simulation of jet flight 
Navigate a new course each flight or 
do aerobatics, instrument takeoffs 
and landings. variable control 
sensitivity for beginner or expert. 
Fully instrumented including "Heads op" 
display. Specify 16K or 32K ex. basic. 
Tape $19,95 Direct save to DISK 



LPVII DMPIOO Descenders 

i.focdsf ghi jk 1 n*m»pqrs.tuvwxyz 

User transparent machine language. 

Includes CHROUT; a program to modify 

ml software, such as Telewriter- 64 

by Cognitec, to use the DESCENDERS program. 

16K/32K TAPE $15.95 Direct save to DISK 

Add SI. tO for shipping to all orders, 

KRT Software 813-321-2840 
P O Box 41395 

St Petersburg, Fj 33743 
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Software RevlewZ 



Diamond In The Rough 
Just Needs Polishing 



It'sa given f act that you can savca lot of coins by finishing 
furniture yourself. Plus, you can learn a lot in the process. 1 
guess the same philosophy might just bleed over into the 
software field somewhat because the product I'm talking 
about is delivered to you cheap and all you have to do is 
customize it to fit your particular financial planning needs. 

The Household Budget Worksheet, or HBW as it's called 
by its author, comes as a short, shell of a program with 
sufficient documentation to allow you to modify the coding 
to write in your own variable assignmentsf or your expenses 
(both fixed and variable) and your various incomes. HBW 
will then give you a printout (on any printer) of the work- 
sheet. No more flipping through a dozen or more screens 
trying to correlate this and that. Now you can go sit down in 
frontof the "boob tube"and figure out from your worksheet 
where you're going to get the money to buy that modem or 
whatever. 

Onee initially set up by you, following the short steps in 
the manual, and then reCSAVEd, HBW only requires you 
to CL0A B it once a month or at your convenience, plug in 
your actual (or estimated) expensesand income from preas- 
sembled data, and without even asking if you're ready gives 
you a neat printout. That's it. Again: f rom that first program 
modification session on, aJl you have to do is enter the 
current month, your payment and expense figures, includ- 
ing any unbudgeted expenses, as well as income. Sit back 
and withina few seconds you've got a tangible printouttobe 
mulled over and filed away. 

The more I ran this little program, the more I liked it. It 
does not have a bunch of bells and whistles nor is there 
anything elaborate about its documentation, but it does give 
you something you Can hold in your hands and analyze No 
file saving; no figuring out a long set of sample personal 
finance situations just to run the darn thing. HBWis short 
and to the point. Its bottom line is printed right out in the 
open for you to see, giving you both itemized and total 
expenses, itemized and total ineome, balances due, savings 
and just how much you have lef t over to play with. Even tells 
you how many more d readed months you'll owe your soul to 
the bank, Sears, the encyclopedia salesmau, company store 
or whomever. 

The program coding is right there in the manual so you 
can get an idea of what you have to do. Modifying the 
program is no big deal at all, even for a "newbie" to pro- 
gramming. HBW uses some very unique but simple algo- 
rithms to calculate everything for you. It gives you enough 
room to work with 30 fixed expenses, 20 variable (budgeted 
and/or charge account) expenses and 20 income itemi?a- 
tions. You ean even enter "exception expenses" that you 
didn't budget for, like a new pair of sneakers for the wife 
after that new piece of "gotta have" software showed up in 
the mail. 

1 didn't like HBW when I first got it, I'm one of those 
people wholl have the guy at the store assemble the 10-speed 
before 1 pick it up. ! hate to admit it, but those instructions 
always seem like so much Japanese to me. So when I read i n 
the HBW's eight page manual that the data loaded into the 
program is demonstration data and that "all" 1 had to d o is 



delete a block of lines and put in my own, I said whoa! I 
mean, it wasn't too long after 1 bought my computer that I 
discovered how truly lazy I am. Why should I pay someone 
for a chance to program— and not make a centfor myself? I 
was ready to chuck the whole shebang out the window. The 
nerve! 

But, 1 decided to give it a fair chance. And 1 ended up 
giving it more and more chances. It soon grew on mc, 
because what I had overlooked from the beginning was its 
sheer simplicity. 

Not too shabby for a wee program that takes up a bitjust 
over4.2K before running(a minimum of I6K and Extended 
Color BASIC are required). If you've got disk, you simply 
transfer it directly to speed up loading with no problem. 

If the package had cost much more, maybe I wouldn't 
recommend it. But at this price, it just might be a gem if you 
think you can follow instructions and plug this doohickey 
into that whatchamacallit, and if you still think "budget 
management" is within your capabilities, just think: you get 
to do some programming to boot! 

So tell, mc, what's wrong with unfinished furniture, any- 
way? The price is right! 

(CoCo Data Enterprises, 1215 Emerald Drive, Orlando, FL 
32808, cassette only, S6.95 + S.75 S&H) 




Take Note! 
Saguaro Software 
Carries Prickly Pear Software 



New This Month 

Color 
Kit 



C«*. 
Ooa 23.18 



Disk 

!el 34.95 
tan 32.00 



"Fantasy Gamer s Package 
Eight-Bit Bartender 
High'. 

Monsters & Mafic 
*VJWng 
"Gangbusters 

Jungle 

Topsy Turvy 



Omni 


Math Pac I 

The Great Word Game 


Clone 

Disc Oi-Jy 
•urs 31.95 


Household Helper 
"Tarot 


"I Ching 


60.00 


** Numerdbgy 


add $2 50/|*oSram 
Uppmg (»5it era*.) 


Retail Tape <8.S5 fcsc 24S5 
Our Price 14 .75 Disc 18.75 



7331 E Beverly Drive 
Tucson, AZ 85710 
(602) 885-6508 
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Software Review^ 



2nd Match: Numeral 



Number Match Is Ideal 
For Young Learners 

Number Match is a learning program distributed by 
Micro School Programs, The program requires the user to 
match a domino pattern with a picture pattern and a 
numeral. It is intended to help the user develop the concept 
of numbers, learn to count from one to nine, and recognize 
the numerals for these numbers. 1 1 is geared for the age level 
of four to six years. 

The program is written in basic for a 32K Extended 
BASIC Color Computer, and the first thing that I noticed 
about it was that it disabled the BREAK key. This is excel- 
lent in a children's program because 1 know from experience 
that little children love to push that red button. 

The program first displays the title and author of the 
program, and then asks you for your first name. After this, 
the program asks you to choose a level. (Easy. Medium, and 
Hard.) At this point, you can choose to have an example 
shown to you or to continue on to the lesson. The documen- 
tation encourages you to do the example if it is your first 
time using the program. 

You can also choose to have the answer choices change 
automatically at a set speed or manually at your own speed , 
I found that the three speeds (Slmv, Medium, and Fflsfjwerc 
too fast, and 1 felt that they should be slowed down. The fast 
speed was too fast even for me, but then again maybe a 
six-year-old is more dexterous than 1 am. 

After all of the initial entries, 1 then called my four-year- 
old daughter to the computer for a test run. My daughter is 
familiar with using the computersince we have other educa- 
tional preschool programs f or her. At the start of the lesson, 
the screen is divided into four sections. The upper half of the 
screen is divided into three rectangles. The first rectangle 
contains the level you ehose and the score. The second 
rectangle contains the domino pattern, and the third rectan- 
gle contains the numeral. The lowe r half of the screen con- 
tains the picture pattern which can be houses, dogs (I think 
they were dogs), trucks, fishes, etc. 

We started out with the manual speed, and she progressed 
through the t hree levcis rather rapidly. The differences in the 
three levels are: 

Easy: 

Given: Domino pattern 
1st Match, Picture pattern 

***************************************** 

| *** BASIC Compiler *** J 

* * 

* Till «N BASIC CO»»lUr, Miles' IHTBttlC, will b»Co™ f}Q QC * 
*•«* of jour nott ui«f M*d ytHUe erosreus, Csnvert BASIC J>3)t. JO * 

* twee cod* U> 660J aachlne lensuege projriHis. * 

* IfECiriCATlONS: J 
I'MdUi. M!NT,M!KT#.Z,IN>UT,lN*Erj,PlfK,POtt.FOI!..SrrP.. Send check or * 

* *eKl,if..TH£N,G0T0,»JUe,*CTURN,ST0r,tHt.B«U, «Wfy order. * 
it XlAfcmTOHE.DIrl.Mrl.CLS.ElECPPIiH.PtOPl.lBSHn, U C.Q.t. * 

* mi i«ii> «C e(u(T»l*nt. Utah iMidrtrtt * 
it * »»r1«t>l* tW«- !S Setlir mtettr urleblti, JS a-nsMlonai tit 51 u». * 

* Intesejr arrays (1 or 2o1inens1tmal), l»i t% icrlng ^ 

* * II(TISS!t*I"e"s Ut till Of all 64k bJrtes of Mlf elans XewUKMre * 
I »Ult til Jlk «ra1lat»t ROM U $*l pre 8 ri.. H Bo» 51*371 * 
J • MTMSIt imci In « 11,12 or Mk KM »er»',cn, xhers SlC.lftali * 

* ALL ¥t*tOKS ARE MCUKG. W1SI-13?! J 



Given: Picture pattern 

1st Match: Domino pattern 

2nd Match: Numeral 

Hard: 

Given: Numeral 

1st Match: »omino pattern 

2nd Match: Picture pattern 

1 discussed these levels of difficulty with my wife, who 
used to be a preschool teacher, and she confirmed that they 
were correct. 

As you progress through a I esson in the manual mode, the 
domino pattern first appears on the screen. Next a picture 
pattern appear* in the lower half of the screen. If the two 
patterns match in number, then you press ENTER, If the 
two patterns do not match, then you press the spacebar to 
change the picture pattern. If the match made is correct, a 
happy face will appear at the bottom of the screen. If it is 
incorrect, a sad face will appear. You will then try again until 
a match is made. 

In the automatic mode, the picture pattern changes auto- 
matically at the speed you choose. You then press the space- 
bar when there is a match. 

As 1 stated earlier, I feel that the progression from manual 
mode, where you have all the time you need, to the Slaw 
mode is too severe and it should be slowed down somewhat. 
One of the good things about this program is that it is 
written in basic. Because of this, 1 was able to look at the 
program and modify it so that the Slow mode was at the 
speed I wanted. 

After the session is over, the program reports the results. 
A record of the number of matches made on the first try will 
be displayed. The program also prints"ni see you later" and 
prints your child's name. My daughter really got a kick out 
of seeing her name printed by the computer. 

The documentation for the program is also written 4|uite 
well. It takes you step by step through the whole program 
and also gives you tips on using the program. The only 
complaint that I have about the documentation is that it is 
put together backwards. They start out by showing you how 
to use the program, and then in the back they describe how 
to load the program. Also, their loading instructions do not 
work. The directions are: 

1. Turn thelRS-80 on. 

2. Put in the diskette, 

3. Press the RESET button. 

4. The program will load automatically. 

1 followed the directions, and it didn't work. 1 think that 
these arc instructions f or loading onto a Model I or 111. 

In summary, I think that Number Match is a worthwhile 
program to buy. The graphics are very well done, and the 
program is very well written. If your child goes to preschool, 
this would be a very good supplement to his or her educa- 
tion. If your child does not go to preschool, this program 
would be a definite asset in assisting his or her education and 
preparing for grammar school. 

(Micro School Programs from Bertsmax Inc., 3647 Slone 
Way North, Seattle, WA 98103, tape $24.85, disk $29.50) 
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ASSEMBLY CORNER 



Tidying Up Your 
Word Processor Program 

By D. S. Lewandowski 
Rainbow Contributing Editor 



I would like \m thank everyone who has requested "Using 
An Editor/ Assembler." They are being sent out as fast 
as possible. I f y ou haven't sent for one all you have to do 
is send a 37 cents stamp, or two 20 cents stamps, to DSL 
Computer Products, Inc., P.O. Box 1 1 13, Dearborn, Mich., 
48121. 1 have chosen to leave "edit" out of this month's 
column, there are some rather interesting things we are 
going to do with Load and Save. 

Okay, if you have entered the June text, follow these steps 
bef ore entering any more. First delete lines 730 and 740, or if 
you wish just change them to remark statements as 1 have 
done. Also rename line 750 to EDIT. Next delete lines 1000 
and 1010. Start entering text at 1000, 

At line 1000 we will place our text, or prompts. Since we 
are dealing with cassette I/O, we need a filename, a ready 
cassette prompt, and of course, an error message in case 
there is no text in buffer. Moving to line 1060 we find the 
entry point for the load routine. Wc point to the ready 
cassette prompt, and wait for a keypress. Once the routine is 
entered it will load the first file it encounters on the tape. 
Now here is an interesting little fact; this is the same routine 
used to load basic and machine language programs. At 
LOOP4we keepreadingin blocks of data until thepointer 
f or the ROM routine contains something other than SFF. 
Once an incomplete block is sensed, wc assume we have 
reached the EOF, or End Of File. At this point we branch to 
LOUT, or Load OUT. Since thcX register is already point- 
ing at the last byte it placed in memory we store it at 
BUFEN, and jump back to the menu. 

Nextat line 1 320, we find SA VE. The first item weneed is 
a filename so we point the X register at MES4. Then we 
jump to our /WjVTsubroutine way back at line 190. Next 
we perform a little error checking; if the B register is greater 
than nine the filename is too long, so we simply ask for it 
again. So far, so good. We prompt for a cassette ready, at 
W A1T3. Saving a program involves a bit more than loading 
one. PointingX at the input buffer, line 1450, we then WAIT 
for a keypress. Now we start the cassette and write a leader. 
At line 1500 we point X directly at the text buffer (wealready 
have the number of bytes to save, back at line 1 320). Saving 

( Dennis Lewandowski, one of the early authors active 
with the Color Computer, specializes in machine 
language programming. He and his wife, Rose, 
founded DSL Computer Products.) 



one block at a time we check the VAR after each block to see 
if it is time to close. Again, if we have anything other than a 
hex SFF it is time to close the file. Once finished, or should I 
say almost finished, we branch to SOUT, or Save OUT. 
Here we place the End Of File marker and save the partial 
block, turn off the cassette, and rejoin the main menu. 

As I said earlier, these routines are the same routines 
which save and load basic and machinelanguage programs. 
Try it, notice how your basic program looks nothing like a 
listing. Why? To conserve memory all basic keywords are 
tokenized. These tokens show up as graphic symbols on the 
screen. Well, that's it for now, have fun, and well see you 
next month. 

The listing: 



KM IME 1I0& 
KM IMF IEJ7 
KM if* ffij? 
MIC 65 km 

mu mi 

nn as 12 

km n n 

Kit m s» 

Kit 27 IS 

it ja a asm 

Kit » n 
KIP 3» 

K2I11 A3« 

K23 If BE K3? 

*2? to M 

Kittt « 

K2I 11 X 

K20 27 H 

K2F 81 H 

IE31 27 88 

K33 A7 m 



K3F IMF K39 
K43 2t Dt 
IE4S 66 M 
K47 A7 A4 
KM Iftf #£39 

w e» m 

K5I K K7? 

«S3 IB HIS 



Htlf 1 A SIMPLE TEIT 

mi STMI LDt 

»!3f ST* 

urn ST* 

M13# JSR 

MUI Lit 

»i7f m 

ma bra 

M!9f PRIST LDA 



PRINT UtTRO 
DISPLAY ON SCSEEH 
00 SftOUHB ROUTINE 
BET BYTE 



11241 CUNT 
II2SJ 
11241 
11271 LOOP 



RETUfS* PI 
t*3?3 ! 
WFEN 



LDA 



11291 BED 

mu CRPA 

tt:n m 

HIH STQ 

11331 MS) 

M34t BLIPS? FD8 

M35I iUFEN PCS 



«»4jf 
M4» 
M43I FIX1 



K5& »t AiCl mtt MIT 



i BUFF POWER 
I 

HID ESTER BYTE 

BUFEN SAVE lOC. 

H»T BET TEIT 

flM m OF TEIT 

BUFEN UPDATE POINTER 

VMS CL3 

DIES' 

PRINT »I3PLft¥ OPtlOIIS 

•Aici imn 
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IE3I fil 


45 










km n 


1C 


II4M 




REST 




HtF il 


45 


Ml 


bipa 


M4S 


ASM £ 


KM 1127 1138 










»E*5 61 


4C 








SSCJI L 


Kii 1127 •!*£ 




IBCO 


LOAD 




Kit ai 


31 










K6B 27 


It 


J~~* 








Ktr ei 


53 






llS3 


ASCII S 


*£7l 1127 HIS 










IE7S 81 


36 


MSB* 


DtPA 


MM 


ASETI 1 


#E77 27 


21 










f£79 21 


DB 






MIT 




K7B ID 


6928 










IDE BE 


If 21 








POINT A) PROflPT 


IE SI BO 


IEI6 


Mill 


JSR 


Milt 




IEB4 If 


•K7 


IUU 




HlfST 


POINT AT TEIT 


IE87 IB 


•EI4 








PRINT TEIT 


(EflA 7E 


•E2I 


•1461 


Jiff 


CflNT 


ENTER WfiE TEIT 


*ES* HIE KI7 


M47* PftPEft 


LDY 


8UFSI 


POINT AT START 


mi si 


U 


•1681 L00P2 








*f 93 27 


IB 




BE8 


fini 


ML TEIT PRINTED 


•US t£ 


A2BF 


M7M 


JSS 


uaw 


SENB TO PRINTER 


*E98 2* 


F7 


M71I 


BRA 


ISBF2 




■EVA 7E 


M27 


11721 EXIT 


Jltf 


fe*27 








M7JI t DELETE 731 TO 741 








M74I «JU3VE EDH T8 7M 




»£9B BE 


IEA3 


M75* EDIT 


tDI 


•THES 




KM M 


1EI4 


M76* 


J SB 


PRINT 




m zi 


11 


II77I 


BRA 


lift (7 




*EB 


4E 


N7M TSES 


FCC 


/NOT AVAUBLE TILL SIPT ISSUE OF DA1NB0M/ 




•DM 


H79* 


FM 


••DM 




ini 




M8#» NESI 


FCC 




A SIMPLE TEIT/ 


•EES 
IEE9 


18 

a 


H81I 
II 821 


FCB 

FCC 


MD 

/ 








MIM 


FCB 


MD 




•F13 


21 
•DID 


•1841 


FCC 




bi B.i. LENANDONSKI/ 


*FiE 
IF2I 


2* 


muma 


FDI 

FCC 


/ ENTER TEIT TERMINATE EACH LINE KITH AN 












PRESS * KEY AND PRESS *TER TO STOP,/ 


IF 75 
•F77 
IFB4 


mi 

21 

18*6 


H67I 
•MB* mi 
ttm 


FDB 

FCC 
FIB 


nm 

1 c - 

MDID 


CONTINUE/ 


If 6* 
•F8F 

IFfl 
*FA4 


21 

IMD 

21 


M9M 
•191* 

1892* 


FCC 
FDB 
FCC 


/ E - 
MDID 

/ l - 


EDIT/ 

LOW FROM TAPE/ 


*FA6 
IFBF 


IBID 

21 

im 


II93J 

msi 


FDB 
FCC 


KMC 

/ P- 


KM) TEIT TO PRINTER/ 


IFC1 


21 


11961 


FDB 

FCC 


MMD 

i S - 


SAVE ON TAPE/ 


mi 

*F»4 


1MB 
21 


M97I 

mm 


FDB 
FCC 


HDID 

1 I - 


EXIT TO BASIC/ 


ffU 

me 


IDM 

21 


11991 
•IMt ISS4 


FDB 

FCC 


•IDII 

/ FIL 


MADE / 


*FF2 


»m 


•mi 


FDD 


MDM 




«FF4 


21 


Iil2l NESS 


FCC 


/ READY CASSETTE 1 


104 


•Dtf 


tl*3* 


FDB 


MM* 




1116 


4E 


•1141 ERNES 


FCC 


/NO TEIT 111 BUFFER / 



llll 



II 



64K for $99! 

We will convert your Radio Shack Color Computer to a lull 84K for only 
$96.00 plus shipping. (Compare this with RS price or $ 149 4 $30 labor 
for 32K upgrade.) Board models D, E«nd F - No matter what ROM you 
have- TyploeWy 24 hourtumaround- Includes hardware modification 
to access the entire 84K. withapeclal soltwansand instructions on use of 
theupper 32IC Pack yourcompuserwell. Include isshier scheck. money 
Order, orpe r«onal checkfa Mow 2 weeks lorcer* onalcheckelf or$ 1 04,00 
(iB9.00 + SS.OOehipping] to PYRAMID. You mayalso pay byMastercard 
or returr. COD. We will Ireat your computer tenderly and rusn it back to 

PYRAMID - 527 Hill St. Santa Monica. CA • 90*05 • (213) 399-2222 



III 9 BE IFF* 

UIC Bl *E16 

IIIF ID Aid 

1122 27 FB 

H24 IF 7C 

1124 84 IF 

1121 97 7D 

II2A IB A77C 

If 2D IE IE37 

1»JI » 7E 

1132 U kM 

1135 «F 84 

1137 IE K37 
l«3A Bl IEI6 

1138 IE K37 

1141 9F 7E 

1142 IF 78 
1144 « 7C 

1144 II A7IB 
1*49 # It 
1*41 K 78 
1»D 24 12 
II4F 21 n 
181 IF IE39 
IIS4 ID A7EI 
1157 7E K40 
USA FC IE3? 
USB 13 (£37 
1I6« 27 44 
1062 FD IK4 

1145 SE IFES 
1KB M IEI4 
l«48 8D AJM 
IKE CI n 

1171 2E F3 

1172 K *FEI 
1I7S IB lEEa 
1178 80 A1C1 
1171 27 Fl 
II7S SE I2D0 
1161 TF 7E 
1*82 8E IMF 
1183 9F 7C 
1187 81 34 
1M9 81 IEJ7 
INC 9F 7E 
HIE H ATM 
im IC 7C 
1193 FC IK4 
im Ml BIFF 
1I9A 21 13 
IMC B3 IIFF 
IMF FD l*C4 
I8A2 2A IS 
1IA4 C3 MFF 

mi u 12 

UA9 C4 FF 

iMI 87 7D 

WAD 88 II 

IMF 21 E2 

U8I 86 FF 

1183 97 7C 

IMS ID 19 

IH7 88 A7EI 

UDA 7E IE4D 

f»8 M A7D8 

1KI 88 A7F4 

l*CJ 9F 7E 
IKS 39 

HC6 llll 

1KB BE life 

I0CB 88 K16 

1ICE M Aid 

1181 27 FB 



fI#S» FCB 

•1141 LOAD LDI 

•1171 m 

•IMI MU2 m 

III9I BE9 

• UN CLR 

•llll LDA 

•1121 STA 

•1131 JSR 

•U4« LDI 

I11SI ST! 

iii4i m 

11171 CLR 

III3I LDI 

•1191 m 

nm ldi 

•1211 BTI 

II22I CLR 

•1231 IK 

•1241 L00P4 m 

II2SI STI 

11261 INC 

•1271 M 

•1281 BRA 

11291 LOUT STI 

«3M JSR 

■nil jhp 

1132* SAVE 180 
1133* 
11341 

11351 STB 

1134* REK lit 

11371 JSR 

•IJBt JSR 

11391 CUPB 

I14M B8T 

0141* LII 

•1421 JSR 

•1431 MIT3 JSR 



SU6D 



•US* 
1 1 441 
•1471 
II4M 
11491 



LOI 



•IS1I STI 

•IS2I JSR 

•133* INC 

II 341 COUNT LDD 
•155* 
•156* 
11571 

•1361 8TD 

*1S9( 8PL 

I16M ABDD 

•141* BRA 

11428 WIT LDI 

•163* NIT STI 

If 641 »SR 

•1«S( BRA 

•144* SOUT LDA 

•167* STA 

•lis* m 

(169* JSR 

(17)1 JRP 

11711 NRSTE JSR 

•1721 m JSR 

•1731 STI 

•1741 RTS 

•I7SI VAR FDB 

H74MDTtr LDI 

•I77« JSR 

•I7B* NAIT4 JSR 

•179* 8ES 

• IBM JM> 

I1BK BUFF » 

•1821 END 



MESJ POINT AT NESS 

PRINT DISPLAY IT 

♦ tlC! 1*«T» 
NAII2 

»7C BLOCK TYPE 

*1F 13 BYTES 

178 I OF BYTES 

•A77C SYNC (/LEASES 

WFST POINT AT BUFF*? 

I7E UPDATE RON POINTER 

IA7IB READ BLOCK 

,1 PUT 2EM AFTER NANE 

BUFST 

PRINT PRINT NANE 



REAfi BLOCK 
UPMTE ROM POINTER 
FULL HOCK' 



LOUT NO * MRE 



KT KIT BLOCK 
I=END OF TEIT 
KOTOR OFF 



L00P4 

MEN 

«A7E8 

FiNI 

BUFEN 

BUfST 

NOTIT 

VAR 

MES4 

PRINT 

mm 



REDO TOO KMV 

HE 54 

PRINT 

IA1CI 

win 

H2BI 



POINT AT NME 
RfHI POINTER 
t OF BYTES 
RON POINTER 
LEADER BLOCK 
POINT AT BUFF 
RON PINTER 



CNP8 ItllFF EOF? 



SUDD 



NIT 

MFF 25! BYTES 

(7D KM POINTER 

WT TD TAPE 

COUNT LOOP 

MFF END OF FILE 

I7C DARKER 

NRT TO TAPE 

IA7EB KTGt Off 

FINI BONE 

•A7JB NOTOS'SYNC 

IA7F4 SAVE BLOCK 

«7E UPDATE RON 
BLOCK SAVED 



PRINT 
•AICI 
KAIT4 



292 the RAINBOW September 19&3 



Software ' — M "^^^^^^^ 

Is A This' 

Everyone knows that two plus two equals f our but did you 
realize that it really depends upon what you want to teach 
with that equation. In the cse of Bertamax's Math Games 
That Tench (Facts Match— Addition), designed for "per- 
sonalized instruction on personal computers for both home 
and school," the author has provided a unique way of reen- 
forcing mathematical knowledge of numbers, words and, in 
this case, additon facts. 

The programcomes with a well-documented booklet that 
explains, quite clearly, all particulars of the program. The 
instructions suggest that an adult explain the program to the 
child the first time around and then let the child work on his 
orherown.The age level recommended forthis Math Game 
is six through eight and works with addition of the numbers 
from zero to 18. "No big deal," you say? Wrong. Here is 
where the author's experience in education shows her ability 
in understanding what young children have to master with 
mathematics. 

The program screen is divided up into four segments. A 
large rectangle (bottom) shows the math problems that the 
child is to work on (graphic numbers— easy to read). The 
top three rectangles are, left to right, program choice with 
score, word name for the numeral shown, and on the right 
side, the numeral that will provide the answer. 



In learning math it is necessary not only to learn what one 
number plus another equals, but also what the words for the 
numbers are. It is also helpful to be able to look at a number 
(i.e., 7) and realize that two numbers can beadded to achieve 
that number (5 4- 2, etc.). The program permits the user to 
choose from three levels that will allow you to decide which 
system you want, pick the answer to the problem and then 
the word, pick the answer and figure out the problem, or 
pick the word and get the problem. Right answers get a 
"happy face" with sound, wrong answers get a "sad face," 
also with sound. You also have three options for groups of 
numbers, 0 to9, 10 to 18, arid 1 to 18. Theprogram willalso 
auto-run an example so you will get the hang of how it 
works. 

The author (Kay L. Schrag, M.Ed.) personalized the pro- 
gram by allowing the user to select not only how fast the 
program will operate, but choice of "manual" so you can 
move it at your own speed. 

A f eature that I personally approve of is that the youngs- 
ter does not have to search out the keyboard to hit the 
proper number in order to respond to a problem. The 
numbers are automatically flashed on the screen, and when 
the proper number appears the child only has to hit thespace 
bar. If the wrong answer is chosen, the program continues 
until the child gets it right. Af ter all problems are completed 
(and correctly done) a report screen shows all the equations 
done and marks an "X"where the proper response was given 
on the first try. 

I tried out the program on my three official program 
testers, Jennifer, 8, David, 10, and Mike, 12. All three liked 
the way the program was designed and enjoyed playing it, 
although Dave and Mike felt it was too easy for them. They 
liked the f aster speeds. Actually they were right, the age level 
is six to eight and Jennifer fit right in. She used the slow 
speed and did fine, thinking out the problems and watching 
for the happyTaee. 

1 feel that the program will help children in the primary 
grades build up confidence with these introductory math 
and word problems. 1 would suggest to parents and teachers 
that a reward system could be developed for students 
improving their first-try results. 

There are a few minor problems that I encountered. First, 
the program did not load according to the directions for the 
TRS-80 diskette. I had to list the directory and run the 
loader program. Second, I do not like the package the 
program comes in. Not that it is not colorful, clear and 
concise, but that there is no way it is going to last, especially 
in a school setting. I would prefer all school programs to use 
a vinyl "library" holder for protection. The booklet is fine 
and should be ho problem at all. Thirdly, I had to adjust to 
TV set color in order to get the program's letters clear 
enough to read. 

These problems can be easily resolved and the most 
important, I f eel, is that the program did not load according 
to the directions. 

Micro School Programs, by Bertamax, Inc.. has a series 
of programs for mathematics, reading, telling time, teach- 
ers, and administrators. If they are all as well-thoughtout 
and designed as "Facts Match-Addition" then Bcrtamax, 
Inc., (including Kay L. Schrag) has a winner. 

(Bertamax, Inc., 101 Nickerson Street, Suite 202, Seattle, 
WA 98109, tape S39.50, disk S39.80J 




Transforms plain paper into 
an invoice (and overdue] 
order (purchase, maill 
quote (list, net, sub) 
payment record 



and stores all the information for easy retrieval later. 
Figure list, net, discount, subtotals, freight, tax, etc. 
Extremely user friendly. 

16KE»ten($»d ffr»ightincludcd) 

EB B3 $29.00 

Best of all. we'll load it with your name, address, 
CC #. tax # and mere to customize this package to 
your needs - FREE! 

Challenger Software 

1 729 Albemarle Rd. 
Clearwater, FL 33542 
or cal (8131 53L76I4 

Open 9 - 3 

We'll mail you samples, more information, 
and a customizing sheet. 



-Michael F. Garozzo 
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Software Reviewm 



; LETTER 

: SETTER 

: TYPESET 

: THIS AD 

* 

* With LETTER-SETTER'S big bold 

* Headlines and your own unique 

* text, you can print a message 

* that no one Mill ignore! 

:ACT 

: UAL 

; SIZE 



Qualities; 

LARGE, CLEAR LETTERS 

- EASY TO USE 

- THREE PRINT SIZES 

Re? Qui r ements : 

- 16K EXTENDED COLOR BASIC 

- DOT ADDRESSABLE PRINTER 

- VOUR IMAGINATION 

Uses: 

- REPORT HEADINGS 

- FLYERS 

~ CHURCH BULLETINS 

PLEASE SEND ME LETTER -SETTER ! 

Name: 

Address: , 



* City, State: 



* PRINTER TYPE; 



»39.95/ea ROM PACK 
*24„95/ea On TAPE 
3_ I TTON 



P.O. BOX TWO 

CHICAGO, ILLINOIS 60690 
(312J 944-2444 



Spelling In Context 
Impressive 



Spelling In Context, LeveU (Grade 2) is designed to teach 
spelling in the context of a sentence. Using this method 
teaches a student the proper spelling and meaning of a test 
word. There are 40 lessons and 4M words in this Level 2 
program. Common second grade words are used. Users 
cannot readily ehange words or sentences in Spelling In 
Context. 

Each word is flashed on the TV screen for a brief period of 
time. When the word disappears a sentence is displayed. The 
sentence has a blank where the test word should appear. The 
student types id the word and presses ENTER on the key- 
board. If the word is correct, a positive reinforcement state- 
ment is displayed and the student is allowed to proceed to 
the next word. On the other hand, if a word is dispelled a 
corrective message is given. The word is flashed on the 
screen a second time and the sentence is displayed again. If 
the user misspells the word a second time, the correct spell- 
ing of the word is presented at the bottom of the display. The 
student will not be allowed to proceed to the next word until 
the misspelled word is spelled correctly. If a student scores 
less than 9§ percent on the lesson, the misspelled words are 
reviewed at the end of the lesson. 

I play-tested Spelling In Context, Level 2 on Stacey, the 
niece of my upstairs neighbor. This was Stacey's first contact 
with a computer. Vm happy to report Stacey wants her 
mother to buy a computer and her mother is very responsive 
after seeing the CoCo in action. With very little tutoring 
Stacey was running the program like a pro. 

Spelling In Context, Level 2 uses the extra color set *f 
PMODE3; black, blue, orange, and buff. Text is displayed 
in upper and lower ease. Some text lettering is hard to read, 
This might be corrected by Increasing the size of the letters. I 
found it hard to read the blue text on the black background. 
The buff and orange text read OK on the black background. 

Everyone involved in testing Spelling In Context, Lever 2 
was impressed with the overall program. It is obvious that 
much time was spent selecting the spelling words and text 
used in this program. The program material includes a well 
written manual. The sound and musical tunes generated by 
Spelling In Context are adequate. 

I think more positive reinforcement should be given for 
high scoring. Additional sound or graphic routines could 
give the added reinforcement. Stacey was a little let down by 
the ending routines used with this program. 

Bertamax Inc., the producers of Spelling In Context, 
Level2, has a large line of educational software available for 
the CoCo. If these programs are as well thought out as 
Spelling In Context, Level 2 they will make a welcome 
addition to a program library. Most Bertamax programs are 
available ou tape or disk. 

(Bertamax Inc., 101 Nickerson Street, Suite 202, Seattle, 
WA 98109, 32K tape $45.50, dUk $49.50) 

-Gabriel Weaver 



USING GRAPHICS 



mom sm 



By Don Inman 
Rainbow Contributing Editor 



This month's Using Graphics article will "brush up"on 
the PAINT statement of Extended Color BASIC. In 
the book "TRS-80 Color Computer Graphics," I used 
a program that filled a can with paint using the PAINT 
statement. Since there was no top on the can. the paint 
"spilled"out of the can and filled the screen. That program 
was used to emphasize two important features of PAINT: 

1) If you PAINTfrom inside a figure that is not closed, 
the paint will "spill" outside the figure. 

2) Once you begin to PAINTan area, there is no way to 
stop until the painting has been completed. 

Paint Can 

The .PAINT instruction works in deliberate, mysterious 
ways. Suppose you design a paint can with many baffles 
distributed about the inside. You also put a top on the can 
and devise some way to fill the can with paint after it has 
been closed. The paint can may be represented on a graphic 
screen as shown in Figure 1. 



( Don Inman is the acknowledged mas- 
ter of microcomputer graphics and the 
author of a large number of books, 
including TRS-80 Color Computer 
Graphics and Assembly Language 
Graphics for the TRS-80 Color Com- 
puter with Kurt Inman.) 



Figure 1 - Closed Can With Baffles 



JO4OI0WT0WM100 1101201W 1W1M1W1T0 1W1M2M210 220 



You might give each section of the can a number, Then start 
painting f rom a dif f erent section each time. As an example, I 
numbered the sections as follows: 



13 


14 


12 


11 


9 


10 


8 


7 


5 


6 


4 


3 


1 


2 



If you start painting in section 
I, will the order of fill be: 1,2,3, 
4,5,6,7,8,9,10,11,12,13,14? 



- 'set tht mode 



• 'define it rings 



At the top of each baffle, a small space is provided for the 
paint to move from right to left or from left to right. At the 
side of each baffle , space is left f or the paint to move upward 
or downward. The can with baffles will be drawn with the 
following program lines. 

PMODE 3, 1 
PCLS: SCREEN 1 , t 
A*»"D30|NR170" 
B«*"U30J NL170" 
C*="BD2;D13" 



* bottom, right, top 

DRAW" BM30, 40 ? XA« ; XA» ; XA» ; ■ \ - ctnttt 
DRAW"D15JR190?XB»?XB*;XB*?U15 / 

;L190" jt 

DRAW"BM125,40?XC*; XC»|XC«; XC* 
; xc»;xc»? xc*; " 

The greatest part of the can is drawn using pieces formed 
by the substrings: 



A$ - D30 I, 



ABD2 
Jd13 



NR170 = draw right 170 and 
return to the start 



NL170 = draw left 170 and 
return to the start 



BD2 = Blank move Down 2 



These Substrings are called by the DRA W statement by 
XA5, XBS and XCS. 

The idea behind our baffled can is to investigate how the 
PAINT statement will fill the can. If you start the fill at 
different points within the can, will the order of fill change? 



The Baffled Can program that follows may be used for 
your investigation, Two inputs are requested. After the can 
has been drawn, the computer asks: 



| PAINT FROM WHERE (X,Y)7 

Input the X, Y coordinates for the point at which you wish to 
start painting. The compute will then ask for a color code. 

/PAINT FROM WHERE (X,Y)?1 27,144 
I OOLOR(6,7,8)? 

Input one of the color codes: 6, 7, or 8. Then watch closely as 
the can fills with paint. 

99 REM— SET SCREEN AND VARIABLES 

100 PMODE 3,1 
110 PCLSSCLS 

120 A*«"D30|NR170" 
130 B*-"U30;NL170" 

140 C«-BD2;D13» 

150 * Y^S^Mth iiibrtrim-^eii it 

199 REM-DRAW CAN \ N^s*»«idof«ite 

200 DRAW"BM30,40jXA»iXA«XAtr' / 
210 DRAW"D15)R190( XB«;XB«!XB«(U1 / 
5JL190" / 
220 DRAW"BM125,40;XC*;XC«;XC*;XC/ 

♦jxc»jxc«;xc«i" * ' 

230 ' 

299 REM-SET INPUTS 

300 INPUT "PA I NT FROM WHERE <X,Y) 
" I X , Y 

310 INPUT" COLOR (6,7,B)"1C 
320 * 

399 REM-PAINT 
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400 SCREEN 1,1 
410 PAINT(X,Y) ,C,8 
420 ■ 

499 REM— PAUSE 

500 I*-INKEY« 

310 IF 1*-"" THEN 500 ELSE 110^ 

press any key to 
PAINT again 

The following inputs are suggested for the beginning X,Y 
coordinates. Use any color you wish. If you are quick 
enough, you might tabulate the ordeT in which the sections 
are filled. 



1Z3.B9 



Hint: Widen the gap between the center baffles, and you 
may be able to see what's going on. 

Paint Shop 

The next program is a variation of Program 6-2 which 
appeared in Chapter 6A of "TRS-80 Color Computer Gra- 



phics." An automobile paint shop is drawn at the lower 
center of the screen, An unpainted car drives in from the 
right side of the screen. A door of the paint shop opens, and 
the car enters. The car is painted a random,color in the paint 
shop. Then a second door opens, and the painted car leaves 
the paint shop and exits to the left of the screen. 

The rectangular paint shop is drawn (see Figure 2) by the 
LINE statement: 

Figure 2 — Paint Shop 

2M LJNE(SiaS3)-(152.lJ51.PSET,B 



120 130 140 



Co Co - Cooler €S> 



• Brings operating 
temperature 
to ambient, 
regardless 
of 

accessory 
load 

• Reduces temperature 
of ENTIRE computer . . . 
not Just the SAM chip 

• Easy 1-minute Installation 




• $39.95 



Companion Keyboard Cover $7.95 
Co Co Software 

• Send For Free Catalog • For Fastest Service 
Send Money Order Or Certified Check • Add 
$2.00 Shipping Charge Per Order • Calif. 
Realden tsAdd 6M% Sale* Tax • All Merchandise 
Shipped From Stock • 



REM Industries, Inc. 

9429 B 'Lurline Ave.. Chat tworth, CA 913 1 

(213) 341-3719 
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The unpainted car is drawn in the lower right cornerof the 
screen as shown in Figure 3. This is accomplished by one 
long BRA W statement and two CIRCLE statements. The 
drawing starts at position (208,170). 



300 DRAW'BM 208,I70;R8E4R8F4R8G4L8NE4; 

H4L8G41.8NE4D4 R4BR4NU4R8NU8; 

R8BR4R4NU4E4U4G41.24" 
310 CIRCLEf210.178),5: CJRCLE(230,I78),5 



Figure 3 — The Car 




UTILITIES* FOR 
EXTENDED BASIC 

#UK2 COLOR KRUNCHER - $12.95 

—Reduces Memory Requirements of Any Ext. BASIC 
Program— Speeds Program Execution Time 

—Type In A Program From A Magazine, As Is, Debug It, 
Then Let KRUNCHER Make tt Shorter 

-Includes LN.XREF and REM.REMV (#UR2) 

-Includes "EXTENDED BASIC FASTER" (SF1) 

#F1 "EXTENDED BASIC FASTER" - $3.95 

—The First Published Proven List of Methods YOU Can 
Can Incorporate Into All Your Own Ext. SASIC 
Programs For Maximum Speed Efficiency 

—For Novice or Experienced Programmer 

—For Graphics or Non-Graphics Programs 

#UV4 VARIABLE CROSS REFERENCE— $6.95 

— Lodates All Variables And "Where Used" Line #'s in 

Your Ext. BASIC Program 
—Optional Variable Only List (No Line#'s) 
—Automatic Sort— Optional Printer Output 

#UF2 LLIST FORMATTER — $9.95 

— User-selectabie Margins, Page Lengths. Top-of- 

Form, Font Size, Line Length And More 
—Title And Date Your Important Listings 
—Start And Stop Listings At Any Line # 
—Optional Space Between Lines— Hilights Line 

Numbers— Opt. Single Sheet Pause— For Most 

Recent Printers (can be user modified) 

#UR2 LINE CROSS REFERENCE - $7.95 

—Provides A Sorted Listing Of All Referenced Line 

Numbers — Optional Printer Output 
—Includes Optional REM.REMV— Removes All 

Unreferenced REM s And Comments And Line#'s 
Removes Comments From Referenced REM's 

— Includes Optional Line Protect Feature 

#UD2 DISK DIRECTORY WITH BYTES — $7.95 

—Gives Same Info As DIR, PLUS Individual File Bytes, 
PLUS Free And Used Total Files, Grans, And Bytes, 
PLUS Opt Disk Name, PLUS To Screen Or Printer 

—One Screen At A Time (No More Frantic SFT/@) 

—Includes Separate DISK NAME Program 

#US3 COPY/SEARCH/REPLACE/DELETE — 
$7.95 

—Same As Disk COPY, But To-and-From Disk OR Tape 
—For ASCII Textflles Or Programs Or Datafiles 
—Search OR Search & Replace (optional) OR Search & 

Delete (optional) 
—Excellent For Changing Long Variable Names 
—Great For Changing Spelling Or Capitalization 

#H1 VIDEO'CLEAR — $14.95 

—Computer Associates' VIDEO INTERFERENCE 
REJECTION CABLE-Reduces Or Eliminate Pic- 
ture Interference Caused By Serial Or Disk Cables- 
External TV Cable Replacement— No Soldering— 2 
Min. Installation— For 75 Or 300 Ohm TVs Or Moni- 
tors—Nothing Extra To Buy— Price Includes Ship- 
ping— Qty. Disc. Avail. 
ALLPGMS{EXCEPT#UD2) FOR EXT. BASICTAPE/DISK 



(Post Paid in U.S. & Canada} (PA Residents Add 6%) 
Send Check Or Money Order To: 

MICROLOGIC 

Box 1S3, First Avenue 
East Brady. PA 16028 
(412) 526-5781 



The car is moved to a point in front of the paint shop door 
by one GiETstatement anda series of .Pl/Tstatements using 
a FOR-NEXT loop. A step of two X values was us«d to 
move the car. The GiTTand Pt/Tstatements include a blank 
area at the rear of the car so that a separate PUT statement 
would not be needed to erase the "old" car when it is moved 
to a new position. 




410 FOSi \ - 2fl< TO :n 



Notice that the size of the PUT and GET arrays are each 
51 by 16. The array is dimensioned in line 120 by: 

120 DIM C(22) 
A single dimensioned array may be used. The size of the 
array is roughly calculated from the size of the areas used in 
the PUT and GET statements from: 

(length * width) / k where k = 40for PMODES 3 & 4 
= 80 for PMODES 1&2 
= 160 for PMODE 0 
In this case; length = 255-204 = 5 I 
width = 182-166 - 16 
k-40 

(51*l6)/40 = 8l6/4t-20.4 
22 was actually needed 

A series of ^statements (using the background color) 
opens the garage door. 

500 FOR Y = 1 85 TO 140 STEP -I 

510 PSET( ( 52,Y,1 ) ^ bickground color 

520 NEXT Y 

The car then moves inside, and the shop door is closed by 
using the foreground color: 

700 FOR Y= 1*0 TO 185 

7 1 0 PSET< 1 52 . Y,4) „ ground coio, 

720 NEXT Y 



The car is then painted by: 



_c»lors2,3,or4 



730 R-RND(3)+U 

740 DATA 107,172,1 19,168,131. 172. 135, 174,131, 

176,121,176,113,176,103.176,107.178,127,178 

750 FOR N = TO 10 

760 READ A.B 

770 IF N = 9 THEN R 2 „ *h««fe always color 2 

780 PAINT(A,B),R,4 

790 FOR W=l TO 50; NEXT W ^ time detay 

800 NEXT N 

After the car is painted, the opposite paint shop door 
opens, and the car exits, The car seems to disappear by 
Goring a fixed area and PUTmg it two places to the left, 
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Thenext Gl? ^statement then "loses'Hwo positions from the 
front of the car as shown in Figure 4. This is done by the 
lines: 

970 FOR M = 2 TO 40 STEP 2 
980 GET(29,I66)-(80,182),C,G 
990 PUT(27.166)— (78,182),C,PSET 
1000 NEXT M 



Figure 4 — Disappearing Car 



.30 40 "SO- 60 70 . ftft' 




PUT{27J66h-<?8,182) 



1 CCT(29J6t)-(«0;lM) 



Pt'Tl27.1*6)-t7S.l*2) 




The listing; 

99 REM— 9ET SCREEN AND VARIABLES 

100 PMODE 3, 1ZPCLS 
110 SCREEN 1,0 

120 DIM C<22),E<22> 
130 ' 

199 REM-DRAW PAINT SHOP 

200 LINE (SB, 185) -(152, 135) ,PSET, 
B 

210 ' 



299 REM-DRAW CAR 

300 DRAW 11 BM208 ,1701 RBE4RBF4R8Q4L 
BNE4I H4L864LBNE4D4R4BR4NU4R8NUBI 
R8BR4R4NU4E4U484L24 " 

310 CIRCLE (210, 178) , 5:CIRCLE (230 
, 178), 5 
320 ' 

399 REM-BET CAR AND MOVE 

400 BET (204, 166) - (255, 182) , C,Q 
410 FOR X-204 TO 161 STEP-2 

420 PUT(X-2,166)-(X+49,1B2),C,PS 
ET 

430 NEXT X 
440 » 

499 REM-OPEN SHOP DOOR 

500 FOR Y=1B5 TO 160 STEP-1 
510 PSET<152,Y,1) 

520 NEXT Y 

530 * 

599 REM-MOVE INTO SHOP 

600 GET(161, 166)-(212, 182) ,C,0 
610 FOR X=161 TO 103 STEP-2 

620 PUT(X-2, 166)-<X+49» 182), C, PS 
ET 

630 NEXT X 
640 ' 

699 REM-CLOSE DOOR AND PAINT CAR 

700 FOR Y*160 TO 185 
710 PSETU52, Y,4) 
720 NEXT Y 

730 R«RND(3)+1 

740 DATA 107,172,119,168,131,172 

, 135, 174, 131, 176, 121, 176, 113, 176 

, 103, 176, 107, 178, 127, 178 

750 FOR N=l TO 10 

760 READ A,B 

765 IF N=9 THEN R=2 

770 PAINT (A,B) ,R,4 

780 FOR W=l TO 50: NEXT N 

790 NEXT N 

810 * 

899 REM— RAISE DOOR AND MOVE CAR 

900 FOR Y=1B5 TO 160 STEP-1 
910 PSET(BB,Y,1) 

920 NEXT Y 

930 BET(101, 166)-(152, 1B2),C,B 

940 FOR X»101 TO 31 STEP-2 

950 PUT(X-2, 166)-(X+49, 182), C, PS 

ET 

960 NEXT X 

970 FOR M-2 TO 40 STEP 2 
980 BET (29, 166)— (80, 182) , C, B 
990 PUT (27, 166) -(78, 1B2),C,P9ET 
1000 NEXT M 

1099 REM CLOSE DOOR AND RESTORE 

1100 FOR Y = 160 TO 185 
1110 PSET(B8,Y,4) 

1120 NEXT Y 

1130 RESTORE * BOTO 300 A 
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UTILITY 



The conch, 
bug monit 
Downard, 
cal editor. 



he Rain- 
} by Dan 
/ techni- 



"I V>r the final installment of RAIN BUG, the machine 
j"H language monitor for the CoCo, we will review all of 
JL the available commands in detail, A few are new this 
month such as G, C and B. These commands give you the 
ability to set breakpoints and jump to other program loca- 
tions. All registers may be examined and changed using the 
R command. As you may know, the Motorola ASSIST-09 
monitor was used as a guideline for RAIN BUG. so if more 
information is necessary find a copy of M6809PM(AD) — 
M C6809 MC6809E Microprocessor Programming Manual. 
At the same time you will have (• have a programmable 
timer to implement the trace, or single-step, function and 
that was outside the scope of this series. 1 f any one is success- 
ful interfacing a MC6840 programmable timer, let's hear 
from you. 

Command Format 

RAINBVG accepts three possible command formats 
depending on the operation. Examples are as follows*. 

M SPACE EXPRESSION CR 

O SPACE EXPRESSION! SPACE EXPRESSION2 
CR 

Notice that expression is used instead of address. An expres- 
sion can be a combination of addresses. Elementary opera- 
tors such as "+" and "-" can be used. Leading zeros are 
unnecessary. There are four special characters: 
M— current memory pointer 



( Dan Downard is an electrical engineer and has been 
involved in electronics for 24 years through ham rmdiu 
{ K4KWT), His interem in computers began about Jive 
years ago and he has built several 6SXX systems.} 



W— Window value set by W command 
P — Current program counter 
@ — Indirect address 

Examples: 

M — W — Current memory pointer minus window val- 

P 100 Current program counter minus SI00 
100(53 — Value of two bytes at address $110 
1234 - Hex address SI 234 

As you can see, the expression analyzer is the key to the 
monitor and can be used to your advantage as you become 
familiar with it. Any non-hex input other than those noted 
above will abort a command, A space is used between all 
commands and expressions and all commands are termi- 
nated by a carriage return, 



"That about does it for RAIN BUG. /i 
gives you all you need to know to do 
your own machine language 
programming, " 



B — Breakpoint 

B CR 

B SP - CR 

B SP EXP CR 



Commands 

Add or delete up to eight break- 
points 

Prints all breakpoints 
Deletes all breakpoints 
Adds a breakpoint at EXP 
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B SP - EXP CR 
C - Call 
C CR 

C SP EXP CR 
DR- Disk Read 

DW- Disk Write 

E — Encode 

E SP H , X CR 

E SP HHHH.PCR CR 

G - Go 

G CR 

G SP EXP CR 

L — Load tape 

M — Memory examine 

M SP EXP CR 

HHHH / 

I 

EXP 

SP or , or / 
LF 

UA 

CR 

' TEXT ' 
O - Offset 
O SP FROM SP 



Deletes a break at EXP 
Call a user subroutine 
Call routine at current program 
counter 

Call routine at address EXP 
Read track and sector after 
prompts at address $2000 
Writes 256 bytes at $2000 to track 
and sector as prompted 
Encode a postbyte 
Return 5-bit offset from X 
Return two byte PCR offset 
Execute user program 
Execute at current program count- 
er 

Execute at address EXP 
Same as CLOADM 
Examine/ change memory 
Examine address EXP 
Examine address HHHH 
Examine at address of last exam- 
ine/change 

Replace byte with EXP 

Go to next address 

Print next address and byte value 

Print previous address and byte 

value 

Terminate command 
Enter ASCII TEXT 
Compute branch offsets 



Abduf Your Subscription 

Yiwr cupj of the HAWBO'W Is *cot seetmd claw 




TO CR 

R — Register 

R CR 

SP 

EX P SP 
CR 

P — Punch 
P SP xxxx 
SP yyyy 
SP KZZ 
SP file CR 
V — Verify 
@ — Printer 



Computes one or two byte 
offset FROM- TO 
Examine/ change registers 
Examine registers 
Skip to next register 
Change and advance to next 
register 

Terminate command 
Same as CSAVEM command 
Save machine language 
program, xxxx-start 
yyyy-end mzz-execute 
file— BASIC filename 
Same as BASIC SKIPF 
Toggles printer port 



Summary 

That about does it for RAIN BUG, It gives you all you 
need to know to do your own machine language program- 
ming. Be extremely careful using the disk commands. All 
input has to be in HEX, Rather than type in the listing I 
would suggest you obtain a copy of Rainbow On Tape as it 
will havetheentire program and saveyouhours debugging. 
The program is position independent and can be relocated 
anywhere in memory. At present it is located at 53000. 
Addresses immediately below S3W0, or wherever you wish 
to locate the program, are used for tbe stack. Try to avoid 
this area. Good luck and happy programming. 

11101 *RA1NBUS 

if 110 tOAN DDHNARD REV 4 

Hill HINES 100-2101 AND LINES 

00112 *2883-4870 APPEARED IN PARTS 

00 113 *1 THRU 4 OF THIS SERIES 



3000 




00120 ORG 


13000 






02103 tCQLD START 




319E 30 


BC FD 


02130 RESET im 


RESET, PCR 


31A1 ?F 


9D 


02160 STJt 


♦9» 


31A3 20 


12 


02170 BRA 


H0NTR1 






02173 »ERR0R MESSAGE 




31A5 


3FI4 


021B0 ERRHS8 FSB 


♦3F04 


31A7 30 


8C FB 


02190 ERROR LEAK 


ERRKSB,PCR 


31AA SD 


E2 


02200 ESR 


PDATA1 


31AC 16 


0410 


02210 LBRA 


CK5 






02213 HMNITDR PROMPT 




31AF 


52 


02220 SI8N0N FCC 


/RAINBUS/ 


3114 


04 


02230 FCS 


104 






02235 tSETOP SOFTWARE INTERRUPT 


3iB7 BE 


3S88 


02240 H0NTR1 LDK 


ISM 


31BA BF 


0107 


02251 STX 


1107 


31BD 66 


7E 


02260 LDA 


M7E 


31BF B7 


0106 


02270 STA 


1106 






02275 •SETUP' STACK AND START 


31C2 32 


8D FE0F 


02280 LEAS 


-22*STACK,PCR 


31C6 C6 


16 


02285 LD8 


H16 


31C8 4F 




02290 H0NTR2 CLRA 




31C? IF 


8B 


02300 TFR 


A, DP 


31CB 80 


02 


02310 BSR 


MDNTR 


31CD 20 


F9 


02320 BRA 


H0NTR2 


31CF JIFF 3638 


02338 MONTR STS 


RSTACK 


31D3 38 


EC D9 


02360 LEAX 


S18N0N,PCR 


31D6 8D 


Ai 


02370 BSR 


PDATA 


31D8 16 


03E4 


02380 LBRA 


CMB 



31DB 




023B5 


RHB 


25 


322ft 


73C2 


02B40 


FDB 


VER-* 






02585 *TflBLE DF COMMANDS 


322C 


04 


02B45 


FCB 


4 




31F4 


02560 CHDTBL 


EQU 


t 


322D 


57 


02850 


FCC 


/»/ 


31F4 


04 


02565 


FCB 


4 


322E 


FE5E 


02860 


FDB 


CBINDD-* 


31F5 


42 


02570 


FCC 


III 


3230 


04 


0286S 


FCB 


4 


31F6 


0211 


02580 


FDB 


BKPT-* 


3231 


5B 


026 70 


FCC 


III 


31FB 


04 


025B5 


FCB 


4 


3232 


002B 


02BB0 


FD1 


EXIT-* 


31F9 


43 


02590 


FCC 


HI 


3234 


FE 


02882 


FCI 


-2 


31FA 


02AF 


02600 


FDB 


CSLL-* 






04875 tSET/RESET BREAKPOINTS 


31FC 


04 


0260S 


FCB 


4 


3407 27 


25 


04BB0 BKPT 


BED 


BKDSP 


31FD 


44 


02610 


FCC 


/D/ 


3409 17 


FC89 


04890 


LBSR 


BLDNUH 


31FE 


IIM 


02620 


FDB 


DISK-» 


340C 27 


30 


14900 


BED 


BKAD0 


3200 


04 


02625 


FCB 


4 


340E 81 


2D 


04910 


CHPA 


i»2D 


320) 


45 


02630 


FCC 


HI 


3410 26 


43 


04920 


BNE 


BKERR 


3202 


0061 


02640 


FDB 


ENCDE-* 


3412 17 


FCB0 


04930 


LBSR 


BLDNUH 


3204 


04 


02645 


FCB 


4 


3415 27 


04 


04940 


BEG 


BKDLE 


3205 


47 


02650 


FCC 


/« 


3417 7F 


3561 


04950 


CLR 


BKPTCT 


3206 


0266 


02660 


FEB 


SO-* 


341A 39 




04960 BKRTS 


RTS 




3208 


04 


02665 


FCB 


4 


3418 B5 


44 


04970 BKDLE 


BSR 


8K8ET 


3209 


4C 


02670 


FCC 


III 


341 D 5A 




04980 BKDLP 


DECB 




320A 


72F4 


02680 


FDB 


LOAD-* 


341 E 2B 


35 


04990 


BH! 


8KERR 


320C 


04 


026B5 


FCB 


4 


3420 AC 


A! 


05000 


am 


,y++ 


320D 


4D 


02490 


FCC 


/«/ 


3422 26 


F? 


05010 


BNE 


BKDLP 


320E 


FDF2 


12700 


FDB 


CHEH-*. 


3424 AE 


Al 


05020 BXDLH 


LDX 


,V++ 


3210 


04 


02705 


FCB 


4 


3426 AF 


3C 


05030 


STJf 


-4,Y 


321! 


40 


02710 


FCC 


/•/ 


3428 5ft 




05040 


DECS 




3212 


tm 


02720 


FDB 


PRINT-* 


3429 2A 


F9 


05050 


8PL 


BKDLH 


3214 


04 


02725 


FCB 


4 


342B 7A 


3561 


05060 


DEC 


BKPTCT 


3215 


4F 


02730 


FCC 


/O/ 


342E BD 


31 


05070 BKDSP 


BSR 


BKSET 


3216 


0I1F 


02740 


FDB 


DFFS-* 


3430 27 


£8 


05080 


6EO 


BKRTS 


3218 


04 


02745 


FCB 


4 


3432 30 


ftl 


05090 BKDSL 


LEAH 


,YH 


321? 


50 


02750 


FCC 


191 


3434 17 


FD2F 


05100 


LBSR 


OUT4HS 


321A 


00F4 


02760 


FDB 


PUNCH-* 


3437 5A 




05!!0 


DECB 




321 C 


04 


02765 


FCB 


4 


3438 26 


FB 


05120 


BNE 


BKDSL 


321D 


52 


02770 


FCC 


/R/ 


343A 17 


FD4& 


05130 


LBSR 


PCRLF 


321E 


0296 


02780 


FDB 


RE6-* 


343D 39 




05140 


RTS 




3228 


04 


02785 


FCB 


4 


343E BD 


21 


05150 IKADC 


BSR 


BKSET 


3221 


53 


02790 


FCC 


IS/ 


3440 CI 


08 


05160 


CHPB 


IB 


3222 


0330 


12600 


FDB 


STLEV-* 


3442 27 


31 


05170 


BES 


BKERR 


X24 


04 


02B05 


FCB 


4 


3444 A6 


84 


05181 


LDA 


,* 


3225 


54 


02B10 


FCC 


IV 


3446 E7 


84 


05190 


STB 


il 


3224 


0437 


02820 


FDB 


TRACE-* 


344B El 


84 


05200 


CHPB 




3228 


04 


02825 


FCB 


4 


344A 26 


09 


05210 


BNE 


BKERR 


322? 


56 


02B30 


FCC 




344C A7 


84 


05220 


STA 








3 MRTON Mw 



16K EXT. COLOR BA8IC it 
PRINTER REQUIRED 

WORD 8EARCH PUZZLE MAKER 
STANDARD *6.95 
DEFINITIONS »A.9S 
WIDE *6.9S 
BIG LETTER8 t6.99 
DRILL $6.99 



MATH WORKBHEET-QUIZ MAKER 
WHOLE NUMBERB *6.9S 



«82 mm 

f*0WR OHIO 43066 
M4-W-22T? 



OHIO RES. m 3.5* SALES TAX 

mi mm any 5 isx off msmvr 



FRACTIONS 

DECIMALS 

PERCENTB 

LENSTH 

AREA 

VOLUME 

CAPACITY 

WEIBHT 

TIME 

SPEED 

ANV 10 25% OFF 



•6.93 
•6.93 
•A. 98 
•4.93 
•A. 93 
•4.98 
•A. 98 
•6.98 
•6.98 
•6.98 
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344E 3A 




05230 BKAIL 


DECB 




344F 2B 


07 


0X40 


BMI 


BKA5T 


3451 AC 


Al 


03230 


CHP1 


>¥*♦ 


3453 26 


F9 


05260 


BNE 


BKADL 


3455 16 


0IC6 


05270 BKERR 


LBRA 


CNDBAD 


3458 AF 


A4 


05280 BKAOT 


ST1 


,v 


345A 6F 


31 


05290 


CLR 


-Bt2*l, Y 


34K 7C 


3561 


05300 


INC 


BKPTCT 


345F 20 


CD 


05310 


BRA 


BKOSP 


3461 BE 


3199 


05320 BKSE7 


LDK 


NUMBER 


3464 31 


BD 00FA 


05330 BKLDR 


LEAY 


BKPTBL.PCR 


346B Fi 


3561 


05340 


LDB 


BKPTCT 


346B 39 




05350 


RTS 








05355 *BDTD PROBRAM 




346C BD 


01 


05360 60 


BSR 


BOADDR 


346E 3B 




05370 


RTI 








05375 fSTORE ADDRESS ON STACK 


346F 35 


30 


053B0 6DADDR 


PULS 


Y,« 


3471 34 


10 


05390 


PSHS 


I 


3473 26 


1A 


05400 


BNE 


BONDFT 


3475 BD 


ED 


05410 


BSR 


BKLDR 


3477 fi 


E4 


05420 


LDK 


■5 


3479 5A 




05430 ARHBLP 


DECB 




347A 2B 


IB 


05440 


BMI 


ARNBK2 


347C A6 


30 


05451 


LDA 


-6*2, Y 


347E AC 


Al 


05460 


CHPJ 


,Y" 


3460 26 


F7 


05470 


BNE 


ARflBLP 


34B2 Bl 


3F 


05460 


CNPA 


M3F 


3464 26 


03 


03490 


BNE 


ARMSM 


34B6 B7 


35B2 


05900 


STA 


SM2BFL 


3489 7C 


35M 


05510 ARMNSK 


INC 


H1SFL6 


34BC 16 


01D4 


05520 


LBRA 


DOT 


34BF 17 


FCAD 


05530 BONDFT 


LBSR 


CDNUH 


3492 ED 


£4 


05540 


STD 


>s 


3494 17 


FFCO 


05550 ARHBK2 


LBSR 


BKLDR 


3497 70 


3561 


05560 


NEB 


BKPTCT 


349A 3A 




05570 ARNLOP 


DECB 




349B 102B 


FF7B 


05560 


LBNI 


BKRTS 


349F A6 


B4 


05590 


LM 


CY2 


34A1 A7 


30 


05600 


STA 


-B*2,Y 


34A3 B6 


3F 


05610 


LDA 


•I3F 


34 A5 A 7 


Bl 


05420 


STA 


J, Y++J 


34A7 20 


Fl 


05630 


BRA 


ARHLOP 






0S635 »CALL SUBROUTINE 


34A9 BD 


C4 


05640 CALL 


BSR 


BOADDR 


34AB 35 


7F 


05650 


PULS 


u,y, x,op,d,cc 


34AD AD 


Fl 


05660 


JSR 




34AF 17 


0S04 


05670 GOBRK 


LBSR 


BKPNT 


34B2 20 


FB 


05680 


BRA 


GDBRK 






056S5 *EXAMNE/CHANSE REGISTERS 


34B4 BD 


23 


15690 RES 


BSR 


REGPRT 


34B6 4C 




05700 


INCA 




34B7 BD 


21 


05710 


BSR 


REBCHB 


34B9 39 




05720 


RTS 




34SA 


50 


05730 REGNSK 


FCC 


IP/ 


34BB • 


43 


05740 


FCC 


IZI 


34BC 


FF 


05750 


FCB 


-I 


34BD 


13 


05760 


FCB 


19 


34BE 


41 


05770 


FCC 


/A/ 


34BF 


00 


057B0 


FCB 


0 
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34C0 


0A 


05790 


FCB 


10 


34C1 


42 


059M 


FCC 


m 


34C2 


00 


05B10 


FCB 


0 


34C3 


0B 


05B20 


FCB 


n 


34C4 


5B 


05B3I 


FCC 


m 


34C5 


FF 


05B40 


FCB 


-i 


34C6 


0D 


05B50 


FCB 


13 


34C7 


59 


05B60 


FCC 


111 


34CB 


FF 


05670 


FCB 


*\ 


34C9 


0F 


05B60 


FCB 


15 


34CA 


55 


05890 


FCC 


l\il 


34CB 


FF 


05900 


FCB 


-1 


34CC 


11 


05910 


FCB 


17 


34CD 


53 


05920 


FCC 


IS! 


34CE 


FF 


05930 


FCB 


-1 


34CF 


01 


05940 


FCB 


1 


34D0 


43 


05950 


FCC 


IZI 


34D1 


43 


05960 


FCC 


IZI 


34D2 


00 


05970 


FCB 


0 


34D3 


09 


059B0 


FCB 


9 


34D4 


44 


05990 


FCC 


III 


34S5 


50 


06000 


FCC 


/?/ 


34D6 


00 


06010 


FCB 


0 


3457 


0C 


06020 


FCB 


12 


34DB 


00 


06030 


FCB 


0 






06035 SPRINT 


REBISTE 


RS 


34D9 4F 




06040 REBPRT 


CLRA 




34DA 30 


E8 10 


06050 RE6CH5 


LEAK 


4+12.S 


34DD 34 


32 


06060 


PSHS 


Y,«,A 


34DF 31 


BC DB 


06070 


LEAY 


REGNSK, PCR 


34E2 EC 


A0 


06080 REGP1 


LDD 


|Y+ 


34E4 4D 




06090 


TSTA 




34E5 2F 


05 


06100 


BLE 


RE6P2 


34E7 17 


FC90 


06110 


LBSR 


DUTCH 


34EA 20 


F6 


06120 


BRA 


REBP1 


34EC B6 


2D 


06130 RE6P2 


LDA 


t*2D 


34EE 17 


FCB9 


06140 


LBSR 


DUTCH 


34F1 30 


E5 


06150 


LEAK 


B,S 


34F3 61) 


E4 


06160 


TST 


,s 


34F5 26 


16 


06170 


BNE 


RE6CNS 


34F7 6D 


3F 


06180 


TST 


"1,Y 


34F9 27 


05 


06190 


BED 


REBP3 


34FB 17 


FC6B 


06200 


LBSR 


0UT4HS 


34FE 20 


03 


06210 


3RA 


REG4 


3500 17 


FC63 


06220 REGP3 


LBSR 


0UT2HS 


3503 EC 


A0 


06230 REG4 


LDD 




3505 5D 




06240 


T6TB 




3506 26 


DA 


06250 


BNE 


REGP1 


350B 17 


FC7B 


06260 


LBSR 


PCRLF 


350B 35 


B2 


06270 RE6RTN 


PULS 


PC.Y.LA 






06275 tCHANBE REGISTERS 


350D 17 


FBB3 


062B0 REGCNG 


LBSR 


BLDNNB 


3510 27 


li 


06290 


BED 




3512 61 


0D 


06300 


C(1PA 


HID 


3514 27 


20 


06310 


8ES 


RE6A9N 


3516 E6 


3F 


06320 


LDB 


-i|Y 


351B 5ft 




06330 


DECB 








06340 


NEBS 




351A 5B 




06350 


ASLB 




3511 17 


FC4C 


06360 RE6SKP 


LBSR 


SPACE 



3S1E 5A 




06370 


DECD 




3557 FD 


3585 


06640 


STD 


SLEVEL 


35IF 26 


FA 


06380 


BNE 


RE8BKP 


353A 39 




06650 


RTS 




3521 20 


EC 


06390 


BRA 


REB4 


355B 30 


6E 


06660 STLDFT 


LEAK 


14,? 


3523 A7 


E4 


06400 REGNKC 


STA 




3551 BF 


3585 


06670 


ST3f 


SLEVEL 


3525 FC 


3199 06410 


LDD 


NUMBER 


3560 39 




06680 


RTS 




3528 6D 


3F 


06420 


TST 


*M 






06685 ♦VARIABLES 




352A 26 


02 


06430 


BNE 


RESTHQ 


3561 


00 


06690 BKPTCT 


FC8 


0 


352C A6 


B2 


06441 


LDA 


,-l 


3562 




06700 BKPT6L 


RHB 


16 


352E ED 


84 


06450 RESTNO 


STD 


,* 


3572 




06710 BKPTOP 


RMB 


1 6 


3530 A 6 


E4 


06460 


LDA 


»s 


3582 




16720 SNIBFL 


RHB 


1 


3532 61 


0D 


06470 


CHPA 


II0D 


3583 




06725 SMICNT 


RUB 


1 


3534 26 


CD 


06480 


BNE 


REG4 


3584 




06730 HISFLS 


RRS 


1 


3536 30 


BD 


FABi 06490 REGA6N 


LEAK 


TSTACK,PCR 




2FEB 


06740 TSTACK 


ECU 


-21+CHEH 


353A C6 


15 


06500 


LDB 


121 


3585 




06750 SLEVEL 


RHB 


2 


353C 35 


02 


06310 REBTF1 


PULS 


A 


3587 




06760 TRACEC 


RHB 


2 


353t A7 


80 


06520 


STA 


,X+ 


3589 




06770 LASTDP 


mi 


2 


3540 5A 




06530 


DECB 








06772 #8DFTHARE INTERRUPT ROUTINE. 


3541 26 


F9 


06540 


BNE 


RESTF1 


3S8B 6A 


BC F5 


06775 SKI 


DEC 


SK1CNT.PCR 


3543 10EE 88 


EC 06550 


LDS 


-20,1 


358E 17 


00E5 


06785 


LBSR 


LDDP 


3547 C& 


15 


06560 


LDB 


121 


3591 EE 


6A 


06770 


LDU 


10,$ 


3549 A6 


82 


06570 RE8TF2 


LDA 


,-K 


3593 33 


5F 


06800 


LEAU 


-1,U 


354B 34 


02 


06580 


PSHS 


A 


3595 7D 


•3582 


06810 


TST 


SNIBFL 


354D 5A 




06590 


DECB 




3598 26 


!0 


06820 


BNE 


SHIDNE 


354E 26 


F9 


06600 


BNE 


REBTF2 


359A 17 


FEC7 


06830 


LBSR 


BKLDR 


3550 20 


B9 


06610 


BRA 


RE8RTN 


359D 50 




06840 


N£8S 








06615 »SET TRACE LEVEL 


359E 5A 




06850 SMILP 


DECB 




3552 27 


17 


06620 STLEV 


BEG 


STLBFT 


359F 2B 


09 


06860 


BHI 


SNIDNE 


3554 17 


FBE6 06630 


LBSR 


CDNUH 


35AJ 11 A3 A] 


06870 


CHPU 


( yh 












35A4 26 


FB 


06880 


BNE 


SUILP 
10,S 






<m® 4Sd> ^JP <s 


S3 .£91 




3SA6 EF 


6A 


06870 


STU 












35A8 20 


0C 


06700 


BRA 


BKPNT 










35AA 7F 


3582 


-06910 SNIDNE 


CLft 


SNIBFL 






Now a iOGO ror the 


35AB 32 


62 


06911 


LEA5 


2,5 

ERRHS6,PCR 






35AF 30 


BD FBF2 


06712 ERR0R1 


LEAK 










3583 17 


FBD0 


06913 


LSSR 


PDATA 






T X M V TL 


IRT 




35B6 17 
35B9 20 


0002 
07 


06920 6KPNT 
06930 


LBSR 
BRA 


RE8PRS 
CHDNEP 


TINY 


TURTLE is an 


affordable, 


3566 17 


FF1B 


06931 RE8PRS 


LBSR 


RE8PRT 


■f 


ull 


y compatible LOGO 


language 


35BE 39 




06932 


RTS 






ith 


high resoultion 


turtle 






06935 tCOHHAND HANDLER 


graphics, music 
ceisor operation 


, fast pro- 


358F 17 


FBC1 


06940 CHB 


LBSR 


PCRLF 


trieval of user 


procedures. 


35C2 17 


FE9F 


06950 CHDNEP 


LBSR 


BKLDR 


TINY 


TURTLE comes 


complete 


35C5 2A 


0D 


06960 


BPL 


CHDNPL 




ith 


soft copy refers 


nee user 


35C7 50 




06970 


NESB 




manual . 






35C8 F7 


3561 


06980 


STB 


BKPTCT 












33C6 3A 




06990 CHDDDL 


DECB 




32K/EXTD BASIC 






35CC 2B 


06 


07000 


BHI 


CHONGL 




CASSETTE or DISK 


*39.95 


35CE A6 


30 


97010 


LDA 


-Bt2,Y 


HARD 


-COPY MANUAL 




44.95 


35D0 A7 


61 


07020 


STA 


I,Y++3 






ALSO 






35D2 21 


F7 


07030 


BRA 


CHDDDL 










35D4 AE 


6A 


07040 CNDNOL 


LDX 


10,S 


GAB 


MILEAGE MONITOR 




35D6 BF 


3195 


07050 


sn 


PCNTER 




DISK 




*9. 95 


35D9 86 


23 


07060 


LDA 


»2J 






COMPUTERS 
450 






33DB 17 


FB9C 


07070 


LBSR 


QUTCH 


SDS 
POB 


B05OTA, NJ 

07&03 


35DE 33 


E4 


070B0 


LEAU 


,s 






NJ ADD 5'/. TAX 


35E0 FF 


3261 


07098 


STU 


PSTACk 












35E3 4F 




17100 


CLRA 














35E4 5F 




07110 


CLRB 








fta&r-i .gem .-gsra ssea-i & 


3© <s^p <m& 


35ES FD 


3199 


07121 


STD 


NUMBER 












35E8 FD 


3584 


07130 


STD 


nlSFLB 
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33£B C4 




07140 




12 








PSMS 


D,CC 




an t 


07160 


1 MB 

LBSR 


READ 


■ 


BD FA6D 


07170 


LEAI 


2*CNPADP,PCR 


35P6 81 


2F 


07188 


CHPft 


II2F 


33F8 27 


♦B 


07190 


BE8 


CHDIBT 




2 f 




CNPA 


M28 


vwr « 




07210 


SLS 


CHDGQT 


33PE 34 


02 


07220 


PSHS 


A 




'[ 


07230 


INC 


-i,U 


3602 61 




07240 


CMPA 


M2F 


3604 27 


4B 


07250 


BEQ 


CHDHEH 


Ti!o •!? 


FB03 


07260 


LBSR 


BLDHIC 




02 


07270 


8EB 


CHD3 


360B M 


5E 


072B0 


DEC 


-2|U 


360D 17 


FB26 


07290 CHD3 


LBSR 


READ 


3610 21 


E8 


#7300 


BRA 


CHD2 


3612 B0 




07310 CrlDSDT 


5UBA 


MID 




3D 


07320 


STfl 


-3,U 


3616 30 


on cor\& 


07330 


LEAK 


CNDTBLiPCR 


361A Ed 


88 


07340 CHDSCH 


LDB 


,1+ 


361C 2ft 


07 


07350 


BPL 


CMDSHE 


361E Ml 3261 


07360 CftDBAD 


LDS 


PSTACK 


3622 16 


FBB2 


07370 


LBftft 


ERROR 


3625 5ft 




9/int cncsnc 


DECB 




3626 El 


5F 


17390 


CHP8 


-I|U 


3628 24 


03 


07400 


BHS 


CNDSIZ 


362A 3A 




07410 CN8FLS 


ABX 




362B 20 


ED 


07420 


BRA 


CHDSCH 


3620 31 


5D 


07430 CHDS1Z 


LEAY 


-S,U 


362F As 


5F 


07140 


IDA 


-i,u 


3631 Bl 


02 


07450 


SUBA 


12 


3633 A7 


5E 


07461 


STA 


-2,U 


3635 !A 




07470 CHDCftP 


DECB 


3636 A6 


88 


07488 


LDA 


i "* 


363B Al 


A2 


07 498 


CHPA 




363A 26 


EE 


07300 


BHE 


CNDFLS 


363C 6A 


5E 


07511 


DEC 


-2,U 


363E 26 


F5 


87520 


BNE 


CUDCWP 


3640 3A 




07530 


A8I 




341! EC 


IE 


07548 


LDD 


"2, 1 


3643 30 


8B 


07550 


LEAI 




3645 6fi 


5D 




TST 


-3,U 


3647 32 


C4 


07570 


LEAS 




364? AD 


IE 


07580 


JSfl 


-2,)t 


364B 16 


FFB6 


07590 


LBRA 


CHDNOL 


364E AD 


5E 


87608 CrlDHEH 


TST 


-2, U 


3650 2B 


CC 


07610 


Bfil 


CHD8AD 


3652 30 


89 FFA2 


07620 


LEAK 


CHENN-CflPADP, I 


3656 FC 


3199 


07630 


LDD 


NUMBER 


3659 20 


EA 


07640 


BRA 


CHDI8T 




2FEB 


87650 STACK 


EOU 


-2UCNEH 


3658 




07660 RSTACK 


RUB 


2 






07665 (TRACE FUNCTION 




365D 17 


FADF 


07670 TRACE 


LBSR 


CDNUH 


3660. FD 


3387 


07680 


STD 


TRACEC 


3663 32 


62 


07690 DOT 


LEAS 


2,5 


3665 EE 


F8 0A 


87780 TRCE3 


LDU 


[j| ej 


566S FF 


3589 


87711 


STU 


LASTOP 


366B FE 


3685 


07720 


LDU 


PTH 



364E CC 


8701 


07730 


LDD 


•♦#?•! 


3671 ED 


C9 3665 


07740 


STD 


PTIt.U 


1675 36 




07790 


RTI 






I77H ♦CLEAR UP STACK 


3676 5F 




07760 iDDP 


CLRB 




3677 IF 


?B 


07770 


TFR 


B,DP 


3679 Al 


63 


07780 


CHPA 


3,S 


367B 27 


07 


07790 


BE6 


RTS 


367D 10FE 363B 


07B00 


LOS 


RSTACK 


3681 16 


FF28 


07B10 


LBRA 


ERROR! 


36B4 3? 




07820 RTS 


RTS 








07B25 *Dtinny timer 


ADDRESS 




3665 


87B30 PTH 


EOU 


l 




30* 


07640 


END 


CBEH 
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Print Out Disk Directory 

If you have a long disk directory and want to see all of it, 
or if you simply wish to have a hard-copy printout of your 
directory, one simple command will allow you to do this 
easily. 

Just POKE 1 1 1 ,254:D1R and the entire disk directory will 
appear on your printer, even if it is too long to be fully 
displayed on your screen. 



NEW FOR THE COLOR COMPUTER 

GRAFPLOT 

HIGH RESOLUTION DATA GRAPHING 



e your COLOR COMPUTER Into i 

J ing profess 

.OT is par* 
id engineer^,, , . 

•r COLOR COMPUTER 9r»pNng system; 
te plotting si 

a w/200 data 
jmng data filasl. 

■ ff graphing options: 3 symbol w/3 line types or paints only. 

■ Full function data editing: add. change, delete and sort. 

■ H«rda>P7 w standard acreenprlnt programs Inol supplladl- 

includes Interface for Tandy SCRPRT w/lnstrucllons lor 
interfacing other printer a and acreenprlnt programs, 

■ Unlimited overlays plot 9 or mow data sate per graph. 

■ Graphs output to screen, printer .tapeor disk. 

■ Mote any user-defined function, edit 4 program lines. 

■ Built-Sndata smoothing [moving binomial average], 

■ Built-in integration calculate ereas Of evaluate Integrals of 

user defined functions. 

■ Lists data and Integrele to screen or printer. 

■ Saves completed graphs for instant reloading. 

■ Menu- dr Ivan w/auto-prompt option for feet throughput. 

■ Complete error trepplng-GRAFPLOT won't let you make • 

mistake, practically lir ' 



, Easy upgrade todiak for difference tot pile 

Js end writes tape dots files!. Send check or . 

order to: HAWKES RESEARCH SERVICES, 1442 Sixth St, 
Berkeley, C A, 94710. Include S3 S/H on all orders, Manual 
available Separately for StO + S/H. rofundsbhr wtthpgrctva 
of GRAFPLOT. CArealdants add state aales tax. 
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TUTORIAL 



Save Storage 
By Packing Your Data 



By B. H. Alsop 



Even with a 32K CoCo, BASIC program storage space 
often becomes tight. Every array item. e.g. A(I0). 
uses five bytes of memory. That's pretty expensive. 
One can conserve this valuable resource by packing multiple 
data items in one array. Here's how. 
Concept 

c 






2 


3 


4 














A 




V 


B 




1 



















FIGURE 1. PACKING 

"C" is the variable in which two other varia bies (A and B) 
are stored. In this case, "A" can be up to five digits long and 
"B"can be up to four digits long. C can't exceed nine digits 
for a CoCo. Variables A and B can represent integers or 
floating point numbers. 

Sample Program 

Listing 1 shows a sample program illustrating packing 
and unpacking data. Variables A and B each have I OK) 
items. Normally, one would dimension A and B to 1000 
each. This would reserve LOK of memory for these two 
variables. Here a single variable(C) is dimensioned (• 1000. 
Lines 40 and 50 do the testing to assure that A and B are 
within range. Line 60 is necessary to move B behind the 
decimal. Note that a value slightly larger than 0.001 is used 
to avoid round-off errors. I fa value of exactly 0.00 1 is used, 
the unpacked value of B can be one too small. Line 70 does 
the packing. Line $0 unpacks A and line 120 unpacks B 
RUNlhe pujgramand you'll sec that the input and packed/ 
unpacked values are ecjual. I had 17508 byiesof memory left 
when this problem was run. 

(Brian Alsop is a Westinghouse engineer, holds ama- 
teur and commericat radio licenses and a pilot 's 
license. He has used computers for 15 years to solve 
large numeric*! problems.) 
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Listing 2 shows a similar program where A and Bare each 
dimensioned to 1 000. Data is read into each of them. Here 
the memory remaining is 1 2644. The net savings in memory 
is about 5000. 

Caveats 

One doesn't gel something for nothing. I f you don't check 
the input numbers to be within range, you'll get garbage out. 
It is possible for A to be positive or negat ive in this packing/ 
unpacking process. The B can only be positive. The reason A 
can be negative is that I NT(- 1 2.7)=- 1 3 and I N R 12,7)= 1 2. 
This is a curiosity I ran into when writing my packing 
subroutine. I really expected that INT(-! 2.7)=- 1 21 It ap- 
pears that the programmers of the INT function defined it 
with this application in mind. 

Extensions 

If the range of several variables, say A, B and C. are 
suitably restricted, there is no reason why three variables 
can't be packed in one variable. Remember, only one can be 
plus or minus and it must go before the decimal. The sum of 
the maximum significant figures can't exceed nine. 

If you want to pack floating point numbers, first make 
them into integers by multiplying by a known power of 10. 
Truncate with an INT function call, and pack. After unpack- 
ing, divide by the same power of 10. 

Origin 

It seems that in the old days the **big computers'* had 
storage limitations, loo. A 1 6K machine was large back 
then. Thus, the idea of packing came into being. Where I 
work, there is a Cray-I computer which has a 140K fast 
memory and 3,0 million slower core memory, U generates so 
much data in a few minutes of running that it can't all be 
stored on a single three million word tape. Packing is used to 
conserve tape storage. 

It appears that available data to store will always exceed 
the ability- 1* store it. 

Listing 1 

10 DIM C(1000) 

20 FOR 1-1 TO 1000 



30 A-RND ( 9*799) : B-RND ( 9999 ) 

40 IF A>99999 OR A< -99999 THEN P 

RINT"A>99999 OR A< -99999": STOP 

90 IF B>9999 OR B<0 THEN PRINT"B 

>9999 OR B<0":8TOP 

60 B-B*. 00010001 

70 CCD-A+B 

80 PRINT A, 

90 A-INT (C(I») 

100 PRINT A 

110 PRINT INT(B*10000) , 
130 B-INT( 10000* (C(I)-A)) 
130 PRINT B 
140 NEXT I 
180 PRINT MEW 



Listing 2 

10 DIM A<100),BU00> 
20 FOR X-l TO 100 

30 A(I)-RND < 99999) : B ( I ) -RND (9999 
) 

B0 PRINT A CI), 
100 PRINT A 
110 PRINT B(I), 
130 PRINT B 
140 NEXT I 
130 PRINT HEH 





Back Issue Availability 



Back copies of many issues of the RAINBOW are still 
available. 

All back issues sell for the single issue cover price— which 
is $2 for copies of Volume I, Numbers 1 -8 (through Febru- 
ary, 1982), $2.50 for Volume I, Numbers 9, 10 and 12 
(through June except May, 1982) and S2.95 for Volume 11, 
Numbers 9, 10, 1 1, 12 (March, April, June and July 1983). 
Also S2.95 for Volume II, Number 2 (September 1983). In 
addition, there is a S3.50 charge per order for postage and 
handling if sent by United Parcel Service and $6 for orders 
sent U.S. Mail. UPS wY/nof deliver toa postoffice boxorto 
another country. This charge applies whether you want one 
back issue or all of them. 

Most back issues are available on white paper i n a reprint 
form. Issues out of print include May, July, August, Sep- 
tember, October, November, and December, 1982 and Jan- 
uary, February, April, 1983. VISA, Master Card and Amer- 
ican Express accepted. Kentucky residents please add 5 
percent state sales tax. 

Due to heavy demand, we suggest you order baek issues 
you want now while supplies last. 

In addition, copies of the cover only of the July, 1982, 
Anniversary Issue are available separately for S 1 each, plus 
50 cents shipping and handling. These are suitable for 
framing. 



4 Saguaro Software 



Inspector «ue»eau 1-3J6 

StWsS 1995 

Weather Watch 2496 

F»recasi« & Weother 49.95 

Watch (Disk) 

rteatt-Uiag-ChciiatorY 34.95 

Medical Terminology 19.36 
Bowing Sec 24.95 
FeL-reci or. taxtest athi ma 



Gamete Hangman 

Tims Mail 
Tims 

Piereader 

StaSraph 

Tm HWif jgraph 

SBy S^jt crape) 

SBy Syntax tCfec) 



14.95 11.95 

1*99 11,95 

ISM 15.95 23.95 

2-195 19.99 27.95 

19.9S 19.95 Z3.BS 

24.95 1S.9S 27.95 

S.S5 7.9S 15.95 

19.93 15,95 

34.95 19*8 



Prickly Fear 

Prtckly Pear Mail 
Music But 
Astrotogy 
Song Book 



18.95 
25.95 
22.95 



Tom Mix 

IheFrog 
TrapfaD 
Grabber 
Space Shullle 
(Cass. miIy) 



CuUMte Tapcf C-15 65$ 

Software Producers. We wil produce yours on Amdek as we do for Petrocci 
Free lance Associates and Sugar Software. 

Pa. Residents Add 7% Tax • Add $1.00 Per Program For Shipping ($4.00 Max.) 
Pfjfjf* Sorr* Quantifies Limited 

7331 E. Beverly - Tucson, AZ 85710 - (602) 885-6508 



Amdek Do*I 3' DUk Ortv« 



ll*h*Jt!3 Co-Co Cable & 2 Hate 




To get the most o ut of your 64K 
disk system. PricWy Pear Disk 
Zappm (*)fot Amdek disk only 
$16. (Retail, $39.95) 

10 - 3' dkkettet, S65. 
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RAINBOW Info 



How To Read Rainbow 

Please note that all the BASIC 
program listings you will find in the 
Rainbow are formatted for a 32- 
character screen — so they will show up 
just as they do on your CoCo screen. 
One easy way to check on the accuracy 
of your typing Is to compare what 
character "goes under" what. If the 
characters match — and your line 
endings come outthe same — you have 
a pretty good wey of knowing that your 
typing is accurate. 

We also have "key boxes" to show you 
the minimum system a program needs. 
But, do read the text before you start 
typing. 

Finally, the little cassette symbol on 
listings indicates that program is 
available through our Rainbow On Tape 
service. An order form for this service is 
on the insert card bound in the 
magazine. 



RAINBOW 

The Rainbow Seal 

The Rainbow Certification Seal is our 
way of helping you, the consumer The 
purpose of the Seal is to certify to you 
that any product which carries the Seal 
has been physically seen by us and that 
it does, indeed, exist. 

Manufacturers of products — 
hardware, software and firmware — are 
encouraged by us to submit their 
products to the Rainbow for 
certification. We ascertain that their 
products are, in actuality, what they 
purport to be and, upon such 
determination, award a Seal. This lets 
you know that we have seen the product 
and that it does, indeed, exist. 

The Seal, however, is nota "guarantee 
of satisfaction." The certification 
process is different from the review 
process. You are encouraged to read 
our reviews to determine whether the 
product is right for your needs. 

There is absolutely no relationship 
between advertising in the Rainbow and 
thecertification process. Certification is 
open and available to any product 
pertaining to CoCo. A Seal will be 
awarded to any commercial product, 
regardfess of whether the firm 
advertises or n«t. 

We will appreciate knowing of 
instances of violation of Seal use. 



Using Machine Language 

Machine Language programs are one 
of the features of the Rainbow. There a re 
a number of ways to "get" these 
programs into memory so that you can 
operate them. 

The easiest way is by using an Editor- 
Assembler, a program you can purchase 
from a number of sources. 

An editor-assembler allows you to 
enter mnemonics into your CoCo and 
then have the editor-assembler 
assemble them into specificinstructions 
that are understood by the 6609 chip 
that controls your computer. 

When you use an editor-assembler, all 
you have to do, essentially, is copy the 
relevant i nstructions from the Rainbow's 
listing into CoCo. 

Another method of getting an 
assembly language listing into CoCo is 
called "hand assembly." As the name 
implies, you do the assembly by hand. 
This can sometimes cause problems 
when you have to set up an ORIGIN 
statement or an EQUATE. In short, you 
have to know something about 
assembly to hand assemble some 
programs. 

Use the following program if you wish 
to hand assemble machine language 
listings: 

10 CLEAR200,&H3FOO:I=&H3F60 

20 PRINT "ADDRESS:";HEX$(I); 

30 INPUT "BYTE";B$ 

40 POKE l,VAL("&H"+B$) 

50 1=1+1 :GOTO 20 

This program assumes you have a 16K 
CoCo. If you have 32K, change the 
&H3F00 In Line 10 to &H7F10. 



What's A CoCo 

CoCo is an affectionate name which 
was first given to the TRS-80 Color 
Computer by its many fans, users and 
owners. As such, it is almost a generic 
term for three computers, all of which 
are very much alike. 

When we use the term CoCo, we refer 
to the TRS-80 Color Computer, the TDP 
System-100 Computer and the Dragon- 
32 Computer, tt is easier than using the 
three "given" names throughout the 
Rainbow. 

In most cases, when a specific 
computer is mentioned, the application 
is for that specific computer. However, 
since the TDP System-100 and TRS-80 
Color are, for all purposes, the same 
computer in a different case, these terms 
are almost always interchangable. 



The Rainbow Check 

The small boxes which you see with 
programs in the Reinbow are our RAIN- 
BOW CHECK program, which is 
designed to help you type in programs 
accurately. 

The check program will count the 
number of characters you type in. You 
can then compare the number the 
RAINBOW CHECK gives you to those 
printed in the Rainbow. On longer pro- 
grams, some benchmark lines are given. 
When you reach the end of one of those 
lines with your typing, simply check to 
see if the numbers match. 

To use the RAINBOW CHECK, type in 
the program, CSAVE it for future use, 
then type In the command RUN and 
press ENTER. Once the program has 
run, type NEW to remove it from that 
area into which you will be keying 
programs. 

Now, whenever you press the down 
arrow, CoCo will give you the hexade- 
cimal number of bytes in memory. This 
is to check against the numbers printed 
in the Rainbow. If your number is differ- 
ent, check the listing carefully to be sure 
you typed in the proper BASIC program 
code. 

As the hexadecimal number appears 
in the upper-left corner of the monitor 
screen.you may want to clear the screen 
and press the spacebar five or six times 
to move the cursor out of the wav for 
easy reading. The RAINBOW CHECK 
counts spaces, too, follow the spacing 
just as it appears in the magazine. 

Here's the program: 

10 CLSMF PEEK(116) = 127 THEN 
X=32688ELSEX=16304 
20 CLEAR 25,X-1 

30 IF PEEK(116)=127 THEN X=32688 
ELSE X=16304 

40 FOR Z=X TO X+77 

50 READ Y:W=W+Y.PRINT Z.Y.W 

80 POKE Z,Y:NEXT 

70 IF W=5716 THEN 60 ELSE PRINT 
"DATA ERROR":STOP 

80 EXEC X:END 

90 DATA 182, 1, 106, 167, 141, 0, 68 
100 DATA 134, 126, 183, 1, 106, 190 
110 DATA 1, 107, 175, 141, 0,57,48 
120 DATA 141, 0, 4, 191, 1, 107j 57 
130 DATA 129, 10, 38, 44, 52, 22, 220 
140 DATA 27. 147, 25, 142,4, 0, 141 
150 DATA 6, 31, 152, 1 41 , 2, 32, 25 
160 DATA 52, 2, 68, 68, 68, 68 
170 DATA 141. 4, 53, 2. 132 
180 DATA 15, 1 29, 9, 46, 4, 1 39, 1 1 2 
190 DATA 32,2,139,55,167,128,57 
200 DATA 53,22,126,0,0 
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